Mercurial > pidgin
view src/protocols/yahoo/yahoo.c @ 8118:52089b055c12
[gaim-migrate @ 8822]
"Hi over there... just found another overflow while creating
patches for gaim-cvs and 0.75 for all vulnerabilities I have
found. The new overflow is in gaim_url_parse a sscanf without
sizechecks into stackbuffers.
I think you can apply the patches directly and all vulnerabilities
are gone..." -- Stefan Esser
" Using 0.75, looking at the logs for conversations I've
had since upgrading, I discovered that the formating
(font, color, size) of the text was not showing up.
Looking at the actual HTML in the log files I discovered
that the use of tags has replaced with
tags and inline CSS, this formatting shows up fine when
viewing the logs using a browser such as Mozilla, but
not in the Gaim log viewer.
Here, I fixed my own bug in 0.75 and then fixed it in 0.76cvs
so I could give you the diff.
Actually tested it in 0.76cvs, apparently all the font handling
stuff is a bit screwy, but you might as well add my work so
when it's back to normal the log viewer is consistent with the
log files." --Douglas (douglaswth) Thrift
(18:10:53) Me: look at that html patch
(18:11:02) seanegn: I did last night
(18:11:06) Me: and?
(18:12:35) Me: can it go in?
(18:17:33) ***Me senses he is being ignored
(18:18:50) seanegn: haha, no.
(18:18:59) seanegn: It looked like it should be good. Do you want to
commit it?
(18:19:04) Me: i can do that yes
(18:19:14) Me: i'm looking at if the overflow patch compiles currently
(18:19:24) seanegn: do that one too
(18:19:27) Me: :-)
(18:19:48) seanegn: Why do I have a feeling that this conversation
(including this line) is going to be part of a commit log message?
(18:19:53) seanegn: Hi, gaim-commits!
(18:19:56) Me: lol
(18:20:25) Me: *inocently* would i do that?
(18:20:31) Me: :-P
committer: Tailor Script <tailor@pidgin.im>
author | Luke Schierer <lschiere@pidgin.im> |
---|---|
date | Thu, 15 Jan 2004 23:26:07 +0000 |
parents | d60272410bd5 |
children | abbfed0b0050 |
line wrap: on
line source
/* * gaim * * Gaim 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * */ #include "internal.h" #include "account.h" #include "accountopt.h" #include "blist.h" #include "debug.h" #include "multi.h" #include "notify.h" #include "privacy.h" #include "prpl.h" #include "proxy.h" #include "request.h" #include "server.h" #include "util.h" #include "sha.h" #include "yahoo.h" #include "yahoochat.h" #include "yahoo_filexfer.h" #include "md5.h" extern char *yahoo_crypt(const char *, const char *); typedef struct { GaimConnection *gc; char *name; } YahooGetInfoData; /* #define YAHOO_DEBUG */ static void yahoo_add_buddy(GaimConnection *gc, const char *who, GaimGroup *); static struct yahoo_friend *yahoo_friend_new(void) { struct yahoo_friend *ret; ret = g_new0(struct yahoo_friend, 1); ret->status = YAHOO_STATUS_OFFLINE; return ret; } static void yahoo_friend_free(gpointer p) { struct yahoo_friend *f = p; if (f->msg) g_free(f->msg); if (f->game) g_free(f->game); g_free(f); } struct yahoo_packet *yahoo_packet_new(enum yahoo_service service, enum yahoo_status status, int id) { struct yahoo_packet *pkt = g_new0(struct yahoo_packet, 1); pkt->service = service; pkt->status = status; pkt->id = id; return pkt; } void yahoo_packet_hash(struct yahoo_packet *pkt, int key, const char *value) { struct yahoo_pair *pair = g_new0(struct yahoo_pair, 1); pair->key = key; pair->value = g_strdup(value); pkt->hash = g_slist_append(pkt->hash, pair); } int yahoo_packet_length(struct yahoo_packet *pkt) { GSList *l; int len = 0; l = pkt->hash; while (l) { struct yahoo_pair *pair = l->data; int tmp = pair->key; do { tmp /= 10; len++; } while (tmp); len += 2; len += strlen(pair->value); len += 2; l = l->next; } return len; } static void yahoo_packet_read(struct yahoo_packet *pkt, guchar *data, int len) { int pos = 0; while (pos + 1 < len) { char key[64], *value = NULL, *esc; int accept; int x; struct yahoo_pair *pair = g_new0(struct yahoo_pair, 1); x = 0; while (pos + 1 < len) { if (data[pos] == 0xc0 && data[pos + 1] == 0x80) break; if (x >= sizeof(key)-1) { x++; continue; } key[x++] = data[pos++]; } if (x >= sizeof(key)-1) { x = 0; } key[x] = 0; pos += 2; pair->key = strtol(key, NULL, 10); accept = x; /* if x is 0 there was no key, so don't accept it */ if (len - pos + 1 <= 0) { /* Truncated. Garbage or something. */ accept = 0; } if (accept) { value = g_malloc(len - pos + 1); x = 0; while (pos + 1 < len) { if (data[pos] == 0xc0 && data[pos + 1] == 0x80) break; value[x++] = data[pos++]; } value[x] = 0; pair->value = g_strdup(value); g_free(value); pkt->hash = g_slist_append(pkt->hash, pair); esc = g_strescape(pair->value, NULL); gaim_debug(GAIM_DEBUG_MISC, "yahoo", "Key: %d \tValue: %s\n", pair->key, esc); g_free(esc); } else { g_free(pair); } pos += 2; /* Skip over garbage we've noticed in the mail notifications */ if (data[0] == '9' && data[pos] == 0x01) pos++; } } void yahoo_packet_write(struct yahoo_packet *pkt, guchar *data) { GSList *l = pkt->hash; int pos = 0; while (l) { struct yahoo_pair *pair = l->data; guchar buf[100]; g_snprintf(buf, sizeof(buf), "%d", pair->key); strcpy(data + pos, buf); pos += strlen(buf); data[pos++] = 0xc0; data[pos++] = 0x80; strcpy(data + pos, pair->value); pos += strlen(pair->value); data[pos++] = 0xc0; data[pos++] = 0x80; l = l->next; } } static void yahoo_packet_dump(guchar *data, int len) { #ifdef YAHOO_DEBUG int i; gaim_debug(GAIM_DEBUG_MISC, "yahoo", ""); for (i = 0; i + 1 < len; i += 2) { if ((i % 16 == 0) && i) { gaim_debug(GAIM_DEBUG_MISC, NULL, "\n"); gaim_debug(GAIM_DEBUG_MISC, "yahoo", ""); } gaim_debug(GAIM_DEBUG_MISC, NULL, "%02x%02x ", data[i], data[i + 1]); } if (i < len) gaim_debug(GAIM_DEBUG_MISC, NULL, "%02x", data[i]); gaim_debug(GAIM_DEBUG_MISC, NULL, "\n"); gaim_debug(GAIM_DEBUG_MISC, "yahoo", ""); for (i = 0; i < len; i++) { if ((i % 16 == 0) && i) { gaim_debug(GAIM_DEBUG_MISC, NULL, "\n"); gaim_debug(GAIM_DEBUG_MISC, "yahoo", ""); } if (g_ascii_isprint(data[i])) gaim_debug(GAIM_DEBUG_MISC, NULL, "%c ", data[i]); else gaim_debug(GAIM_DEBUG_MISC, NULL, ". "); } gaim_debug(GAIM_DEBUG_MISC, NULL, "\n"); #endif } int yahoo_send_packet(struct yahoo_data *yd, struct yahoo_packet *pkt) { int pktlen = yahoo_packet_length(pkt); int len = YAHOO_PACKET_HDRLEN + pktlen; int ret; guchar *data; int pos = 0; if (yd->fd < 0) return -1; data = g_malloc0(len + 1); memcpy(data + pos, "YMSG", 4); pos += 4; pos += yahoo_put16(data + pos, YAHOO_PROTO_VER); pos += yahoo_put16(data + pos, 0x0000); pos += yahoo_put16(data + pos, pktlen); pos += yahoo_put16(data + pos, pkt->service); pos += yahoo_put32(data + pos, pkt->status); pos += yahoo_put32(data + pos, pkt->id); yahoo_packet_write(pkt, data + pos); yahoo_packet_dump(data, len); ret = write(yd->fd, data, len); g_free(data); return ret; } void yahoo_packet_free(struct yahoo_packet *pkt) { while (pkt->hash) { struct yahoo_pair *pair = pkt->hash->data; g_free(pair->value); g_free(pair); pkt->hash = g_slist_remove(pkt->hash, pair); } g_free(pkt); } static void yahoo_update_status(GaimConnection *gc, const char *name, struct yahoo_friend *f) { int online = 1; if (!gc || !name || !f || !gaim_find_buddy(gaim_connection_get_account(gc), name)) return; if (f->status == YAHOO_STATUS_OFFLINE) online = 0; serv_got_update(gc, name, online, 0, 0, f->idle, f->away ? UC_UNAVAILABLE : 0); } static void yahoo_process_status(GaimConnection *gc, struct yahoo_packet *pkt) { struct yahoo_data *yd = gc->proto_data; GaimAccount *account = gaim_connection_get_account(gc); GSList *l = pkt->hash; struct yahoo_friend *f = NULL; char *name = NULL; if (pkt->service == YAHOO_SERVICE_LOGOFF && pkt->status == -1) { gaim_connection_error(gc, _("You have been logged off as you have logged in on a different machine or device.")); return; } while (l) { struct yahoo_pair *pair = l->data; switch (pair->key) { case 0: /* we won't actually do anything with this */ break; case 1: /* we don't get the full buddy list here. */ if (!yd->logged_in) { gaim_connection_set_display_name(gc, pair->value); gaim_connection_set_state(gc, GAIM_CONNECTED); serv_finish_login(gc); yd->logged_in = TRUE; /* this requests the list. i have a feeling that this is very evil * * scs.yahoo.com sends you the list before this packet without it being * requested * * do_import(gc, NULL); * newpkt = yahoo_packet_new(YAHOO_SERVICE_LIST, YAHOO_STATUS_OFFLINE, 0); * yahoo_send_packet(yd, newpkt); * yahoo_packet_free(newpkt); */ } break; case 8: /* how many online buddies we have */ break; case 7: /* the current buddy */ name = pair->value; f = g_hash_table_lookup(yd->friends, gaim_normalize(account, name)); if (!f) { f = yahoo_friend_new(); g_hash_table_insert(yd->friends, g_strdup(gaim_normalize(account, name)), f); } break; case 10: /* state */ if (!f) break; f->status = strtol(pair->value, NULL, 10); if ((f->status >= YAHOO_STATUS_BRB) && (f->status <= YAHOO_STATUS_STEPPEDOUT)) f->away = 1; else f->away = 0; if (f->status == YAHOO_STATUS_IDLE) f->idle = time(NULL); else f->idle = 0; if (f->status != YAHOO_STATUS_CUSTOM) { g_free(f->msg); f->msg = NULL; } f->sms = 0; break; case 19: /* custom message */ if (f) { if (f->msg) g_free(f->msg); f->msg = yahoo_string_decode(gc, pair->value, FALSE); } break; case 11: /* this is the buddy's session id */ break; case 17: /* in chat? */ break; case 47: /* is custom status away or not? 2=idle*/ if (!f) break; f->away = strtol(pair->value, NULL, 10); if (f->away == 2) f->idle = time(NULL); break; case 138: /* either we're not idle, or we are but won't say how long */ if (!f) break; if (f->idle) f->idle = -1; break; case 137: /* usually idle time in seconds, sometimes login time */ if (!f) break; if (f->status != YAHOO_STATUS_AVAILABLE) f->idle = time(NULL) - strtol(pair->value, NULL, 10); break; case 13: /* bitmask, bit 0 = pager, bit 1 = chat, bit 2 = game */ if (strtol(pair->value, NULL, 10) == 0) { if (f) f->status = YAHOO_STATUS_OFFLINE; serv_got_update(gc, name, 0, 0, 0, 0, 0); break; } if (f) yahoo_update_status(gc, name, f); break; case 60: /* SMS */ if (f) { f->sms = strtol(pair->value, NULL, 10); yahoo_update_status(gc, name, f); } break; case 16: /* Custom error message */ { char *tmp = yahoo_string_decode(gc, pair->value, TRUE); gaim_notify_error(gc, NULL, tmp, NULL); g_free(tmp); } break; default: gaim_debug(GAIM_DEBUG_ERROR, "yahoo", "Unknown status key %d\n", pair->key); break; } l = l->next; } } static void yahoo_do_group_check(GaimAccount *account, GHashTable *ht, const char *name, const char *group, gboolean *export) { GaimBuddy *b; GaimGroup *g; GSList *list, *i; gboolean onlist = 0; char *oname = NULL; if (!g_hash_table_lookup_extended(ht, gaim_normalize(account, name), (gpointer *) &oname, (gpointer *) &list)) list = gaim_find_buddies(account, name); else g_hash_table_steal(ht, name); for (i = list; i; i = i->next) { b = i->data; g = gaim_find_buddys_group(b); if (!gaim_utf8_strcasecmp(group, g->name)) { gaim_debug(GAIM_DEBUG_MISC, "yahoo", "Oh good, %s is in the right group (%s).\n", name, group); list = g_slist_delete_link(list, i); onlist = 1; break; } } if (!onlist) { gaim_debug(GAIM_DEBUG_MISC, "yahoo", "Uhoh, %s isn't on the list (or not in this group), adding him to group %s.\n", name, group); if (!(g = gaim_find_group(group))) { g = gaim_group_new(group); gaim_blist_add_group(g, NULL); } b = gaim_buddy_new(account, name, NULL); gaim_blist_add_buddy(b, NULL, g, NULL); *export = TRUE; } if (list) { if (!oname) oname = g_strdup(gaim_normalize(account, name)); g_hash_table_insert(ht, oname, list); } else if (oname) g_free(oname); } static void yahoo_do_group_cleanup(gpointer key, gpointer value, gpointer user_data) { char *name = key; GSList *list = value, *i; GaimBuddy *b; GaimGroup *g; gboolean *export = user_data; if (list) *export = TRUE; for (i = list; i; i = i->next) { b = i->data; g = gaim_find_buddys_group(b); gaim_debug(GAIM_DEBUG_MISC, "yahoo", "Deleting Buddy %s from group %s.\n", name, g->name); gaim_blist_remove_buddy(b); } } static char *_getcookie(char *rawcookie) { char *cookie = NULL; char *tmpcookie; char *cookieend; if (strlen(rawcookie) < 2) return NULL; tmpcookie = g_strdup(rawcookie+2); cookieend = strchr(tmpcookie, ';'); if (cookieend) *cookieend = '\0'; cookie = g_strdup(tmpcookie); g_free(tmpcookie); return cookie; } static void yahoo_process_cookie(struct yahoo_data *yd, char *c) { if (c[0] == 'Y') { if (yd->cookie_y) g_free(yd->cookie_y); yd->cookie_y = _getcookie(c); } else if (c[0] == 'T') { if (yd->cookie_t) g_free(yd->cookie_t); yd->cookie_t = _getcookie(c); } } static void yahoo_process_list(GaimConnection *gc, struct yahoo_packet *pkt) { GSList *l = pkt->hash; gboolean export = FALSE; gboolean got_serv_list = FALSE; GaimBuddy *b; GaimGroup *g; struct yahoo_friend *f = NULL; GaimAccount *account = gaim_connection_get_account(gc); struct yahoo_data *yd = gc->proto_data; GHashTable *ht; char **lines; char **split; char **buddies; char **tmp, **bud, *norm_bud; char *grp = NULL; if (pkt->id) yd->session_id = pkt->id; while (l) { struct yahoo_pair *pair = l->data; l = l->next; switch (pair->key) { case 87: if (!yd->tmp_serv_blist) yd->tmp_serv_blist = g_string_new(pair->value); else g_string_append(yd->tmp_serv_blist, pair->value); break; case 88: if (!yd->tmp_serv_ilist) yd->tmp_serv_ilist = g_string_new(pair->value); else g_string_append(yd->tmp_serv_ilist, pair->value); break; case 59: /* cookies, yum */ yahoo_process_cookie(yd, pair->value); break; } } if (pkt->status != 0) return; if (yd->tmp_serv_blist) { ht = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, (GDestroyNotify) g_slist_free); lines = g_strsplit(yd->tmp_serv_blist->str, "\n", -1); for (tmp = lines; *tmp; tmp++) { split = g_strsplit(*tmp, ":", 2); if (!split) continue; if (!split[0] || !split[1]) { g_strfreev(split); continue; } grp = yahoo_string_decode(gc, split[0], FALSE); buddies = g_strsplit(split[1], ",", -1); for (bud = buddies; bud && *bud; bud++) { norm_bud = g_strdup(gaim_normalize(account, *bud)); if (!(f = g_hash_table_lookup(yd->friends, norm_bud))) { f = yahoo_friend_new(); g_hash_table_insert(yd->friends, g_strdup(norm_bud), f); } if (!(b = gaim_find_buddy(account, norm_bud))) { if (!(g = gaim_find_group(grp))) { g = gaim_group_new(grp); gaim_blist_add_group(g, NULL); } b = gaim_buddy_new(account, norm_bud, NULL); gaim_blist_add_buddy(b, NULL, g, NULL); export = TRUE; } yahoo_do_group_check(account, ht, norm_bud, grp, &export); g_free(norm_bud); } g_strfreev(buddies); g_strfreev(split); g_free(grp); } g_strfreev(lines); g_string_free(yd->tmp_serv_blist, TRUE); yd->tmp_serv_blist = NULL; g_hash_table_foreach(ht, yahoo_do_group_cleanup, &export); g_hash_table_destroy(ht); } if (yd->tmp_serv_ilist) { buddies = g_strsplit(yd->tmp_serv_ilist->str, ",", -1); for (bud = buddies; bud && *bud; bud++) { /* The server is already ignoring the user */ got_serv_list = TRUE; gaim_privacy_deny_add(gc->account, *bud, 1); } g_strfreev(buddies); g_string_free(yd->tmp_serv_ilist, TRUE); yd->tmp_serv_ilist = NULL; } if (got_serv_list) { gc->account->perm_deny = 4; serv_set_permit_deny(gc); } if (export) gaim_blist_save(); } static void yahoo_process_notify(GaimConnection *gc, struct yahoo_packet *pkt) { char *msg = NULL; char *from = NULL; char *stat = NULL; char *game = NULL; struct yahoo_friend *f = NULL; GSList *l = pkt->hash; GaimAccount *account = gaim_connection_get_account(gc); struct yahoo_data *yd = (struct yahoo_data*) gc->proto_data; while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 4) from = pair->value; if (pair->key == 49) msg = pair->value; if (pair->key == 13) stat = pair->value; if (pair->key == 14) game = pair->value; l = l->next; } if (!from || !msg) return; if (!g_ascii_strncasecmp(msg, "TYPING", strlen("TYPING"))) { if (*stat == '1') serv_got_typing(gc, from, 0, GAIM_TYPING); else serv_got_typing_stopped(gc, from); } else if (!g_ascii_strncasecmp(msg, "GAME", strlen("GAME"))) { GaimBuddy *bud = gaim_find_buddy(gc->account, from); if (!bud) { gaim_debug(GAIM_DEBUG_WARNING, "yahoo", "%s is playing a game, and doesn't want " "you to know.\n", from); } f = g_hash_table_lookup(yd->friends, gaim_normalize(account, from)); if (!f) return; /* if they're not on the list, don't bother */ if (f->game) { g_free(f->game); f->game = NULL; } if (*stat == '1') { f->game = g_strdup(game); if (bud) yahoo_update_status(gc, from, f); } } } struct _yahoo_im { char *from; int time; int utf8; char *msg; }; static void yahoo_process_message(GaimConnection *gc, struct yahoo_packet *pkt) { GSList *l = pkt->hash; GSList *list = NULL; struct _yahoo_im *im = NULL; if (pkt->status <= 1 || pkt->status == 5) { while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 4) { im = g_new0(struct _yahoo_im, 1); list = g_slist_append(list, im); im->from = pair->value; im->time = time(NULL); } if (pair->key == 97) if (im) im->utf8 = strtol(pair->value, NULL, 10); if (pair->key == 15) if (im) im->time = strtol(pair->value, NULL, 10); if (pair->key == 14) { if (im) im->msg = pair->value; } l = l->next; } } else if (pkt->status == 2) { gaim_notify_error(gc, NULL, _("Your Yahoo! message did not get sent."), NULL); } for (l = list; l; l = l->next) { char *m, *m2; im = l->data; if (!im->from || !im->msg) { g_free(im); continue; } m = yahoo_string_decode(gc, im->msg, im->utf8); gaim_str_strip_cr(m); m2 = yahoo_codes_to_html(m); g_free(m); serv_got_im(gc, im->from, m2, 0, im->time); g_free(m2); g_free(im); } g_slist_free(list); } static void yahoo_process_sysmessage(GaimConnection *gc, struct yahoo_packet *pkt) { GSList *l = pkt->hash; char *prim, *me = NULL, *msg = NULL; while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 5) me = pair->value; if (pair->key == 14) msg = pair->value; l = l->next; } if (!msg) return; prim = g_strdup_printf(_("Yahoo! system message for %s:"), me?me:gaim_connection_get_display_name(gc)); gaim_notify_info(NULL, NULL, prim, msg); g_free(prim); } static void yahoo_buddy_added_us(GaimConnection *gc, struct yahoo_packet *pkt) { char *id = NULL; char *who = NULL; char *msg = NULL, *tmpmsg = NULL; GSList *l = pkt->hash; while (l) { struct yahoo_pair *pair = l->data; switch (pair->key) { case 1: id = pair->value; break; case 3: who = pair->value; break; case 15: /* time, for when they add us and we're offline */ break; case 14: msg = pair->value; break; } l = l->next; } if (id) { if (msg) tmpmsg = yahoo_string_decode(gc, msg, FALSE); gaim_account_notify_added(gc->account, id, who, NULL, tmpmsg); if (tmpmsg) g_free(tmpmsg); } } static void yahoo_buddy_denied_our_add(GaimConnection *gc, struct yahoo_packet *pkt) { char *who = NULL; char *msg = NULL; GSList *l = pkt->hash; GString *buf = NULL; struct yahoo_data *yd = gc->proto_data; while (l) { struct yahoo_pair *pair = l->data; switch (pair->key) { case 3: who = pair->value; break; case 14: msg = pair->value; break; } l = l->next; } if (who) { char *msg2; buf = g_string_sized_new(0); if (!msg) { g_string_printf(buf, _("%s has (retroactively) denied your request to add them to your list."), who); } else { msg2 = yahoo_string_decode(gc, msg, FALSE); g_string_printf(buf, _("%s has (retroactively) denied your request to add them to your list for the following reason: %s."), who, msg2); g_free(msg2); } gaim_notify_info(gc, NULL, _("Add buddy rejected"), buf->str); g_string_free(buf, TRUE); g_hash_table_remove(yd->friends, who); serv_got_update(gc, who, 0, 0, 0, 0, 0); } } static void yahoo_process_contact(GaimConnection *gc, struct yahoo_packet *pkt) { switch (pkt->status) { case 1: yahoo_process_status(gc, pkt); return; case 3: yahoo_buddy_added_us(gc, pkt); break; case 7: yahoo_buddy_denied_our_add(gc, pkt); break; default: break; } } #define OUT_CHARSET "utf-8" static char *yahoo_decode(const char *text) { char *converted; char *p, *n, *new, *end; int i; n = new = g_malloc(strlen (text) + 1); end = text + strlen(text); for (p = (char *)text; p < end; p++, n++) { if (*p == '\\') { sscanf(p + 1, "%3o\n", &i); *n = (char)i; p += 3; } else *n = *p; } *n = '\0'; converted = g_convert(new, n - new, OUT_CHARSET, "iso-8859-1", NULL, NULL, NULL); g_free(new); return converted; } static void yahoo_process_mail(GaimConnection *gc, struct yahoo_packet *pkt) { GaimAccount *account = gaim_connection_get_account(gc); char *who = NULL; char *email = NULL; char *subj = NULL; int count = 0; GSList *l = pkt->hash; if (!gaim_account_get_check_mail(account)) return; while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 9) count = strtol(pair->value, NULL, 10); else if (pair->key == 43) who = pair->value; else if (pair->key == 42) email = pair->value; else if (pair->key == 18) subj = pair->value; l = l->next; } if (who && subj && email && *email) { char *dec_who = yahoo_decode(who); char *dec_subj = yahoo_decode(subj); char *from = g_strdup_printf("%s (%s)", dec_who, email); gaim_notify_email(gc, dec_subj, from, gaim_account_get_username(account), "http://mail.yahoo.com/", NULL, NULL); g_free(dec_who); g_free(dec_subj); g_free(from); } else if (count > 0) { const char *to = gaim_account_get_username(account); const char *url = "http://mail.yahoo.com/"; gaim_notify_emails(gc, count, FALSE, NULL, NULL, &to, &url, NULL, NULL); } } /* This is the y64 alphabet... it's like base64, but has a . and a _ */ char base64digits[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789._"; /* This is taken from Sylpheed by Hiroyuki Yamamoto. We have our own tobase64 function * in util.c, but it has a bug I don't feel like finding right now ;) */ void to_y64(unsigned char *out, const unsigned char *in, int inlen) /* raw bytes in quasi-big-endian order to base 64 string (NUL-terminated) */ { for (; inlen >= 3; inlen -= 3) { *out++ = base64digits[in[0] >> 2]; *out++ = base64digits[((in[0] << 4) & 0x30) | (in[1] >> 4)]; *out++ = base64digits[((in[1] << 2) & 0x3c) | (in[2] >> 6)]; *out++ = base64digits[in[2] & 0x3f]; in += 3; } if (inlen > 0) { unsigned char fragment; *out++ = base64digits[in[0] >> 2]; fragment = (in[0] << 4) & 0x30; if (inlen > 1) fragment |= in[1] >> 4; *out++ = base64digits[fragment]; *out++ = (inlen < 2) ? '-' : base64digits[(in[1] << 2) & 0x3c]; *out++ = '-'; } *out = '\0'; } static void yahoo_process_auth_old(GaimConnection *gc, const char *seed) { struct yahoo_packet *pack; GaimAccount *account = gaim_connection_get_account(gc); const char *name = gaim_normalize(account, gaim_account_get_username(account)); const char *pass = gaim_account_get_password(account); struct yahoo_data *yd = gc->proto_data; /* So, Yahoo has stopped supporting its older clients in India, and undoubtedly * will soon do so in the rest of the world. * * The new clients use this authentication method. I warn you in advance, it's * bizzare, convoluted, inordinately complicated. It's also no more secure than * crypt() was. The only purpose this scheme could serve is to prevent third * part clients from connecting to their servers. * * Sorry, Yahoo. */ md5_byte_t result[16]; md5_state_t ctx; char *crypt_result; char password_hash[25]; char crypt_hash[25]; char *hash_string_p = g_malloc(50 + strlen(name)); char *hash_string_c = g_malloc(50 + strlen(name)); char checksum; int sv; char result6[25]; char result96[25]; sv = seed[15]; sv = sv % 8; md5_init(&ctx); md5_append(&ctx, pass, strlen(pass)); md5_finish(&ctx, result); to_y64(password_hash, result, 16); md5_init(&ctx); crypt_result = yahoo_crypt(pass, "$1$_2S43d5f$"); md5_append(&ctx, crypt_result, strlen(crypt_result)); md5_finish(&ctx, result); to_y64(crypt_hash, result, 16); switch (sv) { case 1: case 6: checksum = seed[seed[9] % 16]; g_snprintf(hash_string_p, strlen(name) + 50, "%c%s%s%s", checksum, name, seed, password_hash); g_snprintf(hash_string_c, strlen(name) + 50, "%c%s%s%s", checksum, name, seed, crypt_hash); break; case 2: case 7: checksum = seed[seed[15] % 16]; g_snprintf(hash_string_p, strlen(name) + 50, "%c%s%s%s", checksum, seed, password_hash, name); g_snprintf(hash_string_c, strlen(name) + 50, "%c%s%s%s", checksum, seed, crypt_hash, name); break; case 3: checksum = seed[seed[1] % 16]; g_snprintf(hash_string_p, strlen(name) + 50, "%c%s%s%s", checksum, name, password_hash, seed); g_snprintf(hash_string_c, strlen(name) + 50, "%c%s%s%s", checksum, name, crypt_hash, seed); break; case 4: checksum = seed[seed[3] % 16]; g_snprintf(hash_string_p, strlen(name) + 50, "%c%s%s%s", checksum, password_hash, seed, name); g_snprintf(hash_string_c, strlen(name) + 50, "%c%s%s%s", checksum, crypt_hash, seed, name); break; case 0: case 5: checksum = seed[seed[7] % 16]; g_snprintf(hash_string_p, strlen(name) + 50, "%c%s%s%s", checksum, password_hash, name, seed); g_snprintf(hash_string_c, strlen(name) + 50, "%c%s%s%s", checksum, crypt_hash, name, seed); break; } md5_init(&ctx); md5_append(&ctx, hash_string_p, strlen(hash_string_p)); md5_finish(&ctx, result); to_y64(result6, result, 16); md5_init(&ctx); md5_append(&ctx, hash_string_c, strlen(hash_string_c)); md5_finish(&ctx, result); to_y64(result96, result, 16); pack = yahoo_packet_new(YAHOO_SERVICE_AUTHRESP, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pack, 0, name); yahoo_packet_hash(pack, 6, result6); yahoo_packet_hash(pack, 96, result96); yahoo_packet_hash(pack, 1, name); yahoo_send_packet(yd, pack); g_free(hash_string_p); g_free(hash_string_c); yahoo_packet_free(pack); } /* I'm dishing out some uber-mad props to Cerulean Studios for cracking this * and sending the fix! Thanks guys. */ static void yahoo_process_auth_new(GaimConnection *gc, const char *seed) { struct yahoo_packet *pack = NULL; GaimAccount *account = gaim_connection_get_account(gc); const char *name = gaim_normalize(account, gaim_account_get_username(account)); const char *pass = gaim_account_get_password(account); struct yahoo_data *yd = gc->proto_data; md5_byte_t result[16]; md5_state_t ctx; SHA_CTX ctx1; SHA_CTX ctx2; char *alphabet1 = "FBZDWAGHrJTLMNOPpRSKUVEXYChImkwQ"; char *alphabet2 = "F0E1D2C3B4A59687abcdefghijklmnop"; char *challenge_lookup = "qzec2tb3um1olpar8whx4dfgijknsvy5"; char *operand_lookup = "+|&%/*^-"; char *delimit_lookup = ",;"; char *password_hash = g_malloc0(25); char *crypt_hash = g_malloc0(25); char *crypt_result = NULL; char pass_hash_xor1[64]; char pass_hash_xor2[64]; char crypt_hash_xor1[64]; char crypt_hash_xor2[64]; char resp_6[100]; char resp_96[100]; unsigned char digest1[20]; unsigned char digest2[20]; unsigned char magic_key_char[4]; const unsigned char *magic_ptr; unsigned int magic[64]; unsigned int magic_work = 0; char comparison_src[20]; int x; int cnt = 0; int magic_cnt = 0; int magic_len; memset(&pass_hash_xor1, 0, 64); memset(&pass_hash_xor2, 0, 64); memset(&crypt_hash_xor1, 0, 64); memset(&crypt_hash_xor2, 0, 64); memset(&digest1, 0, 20); memset(&digest2, 0, 20); memset(&magic, 0, 64); memset(&resp_6, 0, 100); memset(&resp_96, 0, 100); memset(&magic_key_char, 0, 4); /* * Magic: Phase 1. Generate what seems to be a 30 * byte value (could change if base64 * ends up differently? I don't remember and I'm * tired, so use a 64 byte buffer. */ magic_ptr = seed; while (*magic_ptr != (int)NULL) { char *loc; /* Ignore parentheses. */ if (*magic_ptr == '(' || *magic_ptr == ')') { magic_ptr++; continue; } /* Characters and digits verify against the challenge lookup. */ if (isalpha(*magic_ptr) || isdigit(*magic_ptr)) { loc = strchr(challenge_lookup, *magic_ptr); if (!loc) { /* This isn't good */ } /* Get offset into lookup table and lsh 3. */ magic_work = loc - challenge_lookup; magic_work <<= 3; magic_ptr++; continue; } else { unsigned int local_store; loc = strchr(operand_lookup, *magic_ptr); if (!loc) { /* Also not good. */ } local_store = loc - operand_lookup; /* Oops; how did this happen? */ if (magic_cnt >= 64) break; magic[magic_cnt++] = magic_work | local_store; magic_ptr++; continue; } } magic_len = magic_cnt; magic_cnt = 0; /* Magic: Phase 2. Take generated magic value and * sprinkle fairy dust on the values. */ for (magic_cnt = magic_len-2; magic_cnt >= 0; magic_cnt--) { unsigned char byte1; unsigned char byte2; /* Bad. Abort. */ if ((magic_cnt + 1 > magic_len) || (magic_cnt > magic_len)) break; byte1 = magic[magic_cnt]; byte2 = magic[magic_cnt+1]; byte1 *= 0xcd; byte1 ^= byte2; magic[magic_cnt+1] = byte1; } /* Magic: Phase 3. This computes 20 bytes. The first 4 bytes are used as our magic * key (and may be changed later); the next 16 bytes are an MD5 sum of the magic key * plus 3 bytes. The 3 bytes are found by looping, and they represent the offsets * into particular functions we'll later call to potentially alter the magic key. * * %-) */ magic_cnt = 1; x = 0; do { unsigned int bl = 0; unsigned int cl = magic[magic_cnt++]; if (magic_cnt >= magic_len) break; if (cl > 0x7F) { if (cl < 0xe0) bl = cl = (cl & 0x1f) << 6; else { bl = magic[magic_cnt++]; cl = (cl & 0x0f) << 6; bl = ((bl & 0x3f) + cl) << 6; } cl = magic[magic_cnt++]; bl = (cl & 0x3f) + bl; } else bl = cl; comparison_src[x++] = (bl & 0xff00) >> 8; comparison_src[x++] = bl & 0xff; } while (x < 20); /* First four bytes are magic key. */ for (x = 0; x < 4; x++) magic_key_char[x] = comparison_src[x]; /* Get password and crypt hashes as per usual. */ md5_init(&ctx); md5_append(&ctx, pass, strlen(pass)); md5_finish(&ctx, result); to_y64(password_hash, result, 16); md5_init(&ctx); crypt_result = yahoo_crypt(pass, "$1$_2S43d5f$"); md5_append(&ctx, crypt_result, strlen(crypt_result)); md5_finish(&ctx, result); to_y64(crypt_hash, result, 16); /* Our first authentication response is based off * of the password hash. */ for (x = 0; x < (int)strlen(password_hash); x++) pass_hash_xor1[cnt++] = password_hash[x] ^ 0x36; if (cnt < 64) memset(&(pass_hash_xor1[cnt]), 0x36, 64-cnt); cnt = 0; for (x = 0; x < (int)strlen(password_hash); x++) pass_hash_xor2[cnt++] = password_hash[x] ^ 0x5c; if (cnt < 64) memset(&(pass_hash_xor2[cnt]), 0x5c, 64-cnt); shaInit(&ctx1); shaInit(&ctx2); /* The first context gets the password hash XORed * with 0x36 plus a magic value * which we previously extrapolated from our * challenge. */ shaUpdate(&ctx1, pass_hash_xor1, 64); shaUpdate(&ctx1, magic_key_char, 4); shaFinal(&ctx1, digest1); /* The second context gets the password hash XORed * with 0x5c plus the SHA-1 digest * of the first context. */ shaUpdate(&ctx2, pass_hash_xor2, 64); shaUpdate(&ctx2, digest1, 20); shaFinal(&ctx2, digest2); /* Now that we have digest2, use it to fetch * characters from an alphabet to construct * our first authentication response. */ for (x = 0; x < 20; x += 2) { unsigned int val = 0; unsigned int lookup = 0; char byte[6]; memset(&byte, 0, 6); /* First two bytes of digest stuffed * together. */ val = digest2[x]; val <<= 8; val += digest2[x+1]; lookup = (val >> 0x0b); lookup &= 0x1f; if (lookup >= strlen(alphabet1)) break; sprintf(byte, "%c", alphabet1[lookup]); strcat(resp_6, byte); strcat(resp_6, "="); lookup = (val >> 0x06); lookup &= 0x1f; if (lookup >= strlen(alphabet2)) break; sprintf(byte, "%c", alphabet2[lookup]); strcat(resp_6, byte); lookup = (val >> 0x01); lookup &= 0x1f; if (lookup >= strlen(alphabet2)) break; sprintf(byte, "%c", alphabet2[lookup]); strcat(resp_6, byte); lookup = (val & 0x01); if (lookup >= strlen(delimit_lookup)) break; sprintf(byte, "%c", delimit_lookup[lookup]); strcat(resp_6, byte); } /* Our second authentication response is based off * of the crypto hash. */ cnt = 0; memset(&digest1, 0, 20); memset(&digest2, 0, 20); for (x = 0; x < (int)strlen(crypt_hash); x++) crypt_hash_xor1[cnt++] = crypt_hash[x] ^ 0x36; if (cnt < 64) memset(&(crypt_hash_xor1[cnt]), 0x36, 64-cnt); cnt = 0; for (x = 0; x < (int)strlen(crypt_hash); x++) crypt_hash_xor2[cnt++] = crypt_hash[x] ^ 0x5c; if (cnt < 64) memset(&(crypt_hash_xor2[cnt]), 0x5c, 64-cnt); shaInit(&ctx1); shaInit(&ctx2); /* The first context gets the password hash XORed * with 0x36 plus a magic value * which we previously extrapolated from our * challenge. */ shaUpdate(&ctx1, crypt_hash_xor1, 64); shaUpdate(&ctx1, magic_key_char, 4); shaFinal(&ctx1, digest1); /* The second context gets the password hash XORed * with 0x5c plus the SHA-1 digest * of the first context. */ shaUpdate(&ctx2, crypt_hash_xor2, 64); shaUpdate(&ctx2, digest1, 20); shaFinal(&ctx2, digest2); /* Now that we have digest2, use it to fetch * characters from an alphabet to construct * our first authentication response. */ for (x = 0; x < 20; x += 2) { unsigned int val = 0; unsigned int lookup = 0; char byte[6]; memset(&byte, 0, 6); /* First two bytes of digest stuffed * together. */ val = digest2[x]; val <<= 8; val += digest2[x+1]; lookup = (val >> 0x0b); lookup &= 0x1f; if (lookup >= strlen(alphabet1)) break; sprintf(byte, "%c", alphabet1[lookup]); strcat(resp_96, byte); strcat(resp_96, "="); lookup = (val >> 0x06); lookup &= 0x1f; if (lookup >= strlen(alphabet2)) break; sprintf(byte, "%c", alphabet2[lookup]); strcat(resp_96, byte); lookup = (val >> 0x01); lookup &= 0x1f; if (lookup >= strlen(alphabet2)) break; sprintf(byte, "%c", alphabet2[lookup]); strcat(resp_96, byte); lookup = (val & 0x01); if (lookup >= strlen(delimit_lookup)) break; sprintf(byte, "%c", delimit_lookup[lookup]); strcat(resp_96, byte); } pack = yahoo_packet_new(YAHOO_SERVICE_AUTHRESP, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pack, 0, name); yahoo_packet_hash(pack, 6, resp_6); yahoo_packet_hash(pack, 96, resp_96); yahoo_packet_hash(pack, 1, name); yahoo_send_packet(yd, pack); yahoo_packet_free(pack); g_free(password_hash); g_free(crypt_hash); } static void yahoo_process_auth(GaimConnection *gc, struct yahoo_packet *pkt) { char *seed = NULL; char *sn = NULL; GSList *l = pkt->hash; int m = 0; gchar *buf; while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 94) seed = pair->value; if (pair->key == 1) sn = pair->value; if (pair->key == 13) m = atoi(pair->value); l = l->next; } if (seed) { switch (m) { case 0: yahoo_process_auth_old(gc, seed); break; case 1: yahoo_process_auth_new(gc, seed); break; default: buf = g_strdup_printf(_("The Yahoo server has requested the use of an unrecognized " "authentication method. This version of Gaim will likely not be able " "to successfully sign on to Yahoo. Check %s for updates."), GAIM_WEBSITE); gaim_notify_error(gc, "", _("Failed Yahoo! Authentication"), buf); g_free(buf); yahoo_process_auth_new(gc, seed); /* Can't hurt to try it anyway. */ } } } static void ignore_buddy(GaimBuddy *b) { GaimGroup *g; GaimConversation *c; GaimAccount *account; gchar *name; if (!b) return; g = gaim_find_buddys_group(b); name = g_strdup(b->name); account = b->account; gaim_debug(GAIM_DEBUG_INFO, "blist", "Removing '%s' from buddy list.\n", b->name); serv_remove_buddy(account->gc, name, g->name); gaim_blist_remove_buddy(b); serv_add_deny(account->gc, name); gaim_blist_save(); c = gaim_find_conversation_with_account(name, account); if (c != NULL) gaim_conversation_update(c, GAIM_CONV_UPDATE_REMOVE); g_free(name); } static void keep_buddy(GaimBuddy *b) { gaim_privacy_deny_remove(b->account, b->name, 1); } static void yahoo_process_ignore(GaimConnection *gc, struct yahoo_packet *pkt) { GaimBuddy *b; GSList *l; gchar *who = NULL; gchar *sn = NULL; gchar buf[BUF_LONG]; gint ignore = 0; gint status = 0; for (l = pkt->hash; l; l = l->next) { struct yahoo_pair *pair = l->data; switch (pair->key) { case 0: who = pair->value; break; case 1: sn = pair->value; break; case 13: ignore = strtol(pair->value, NULL, 10); break; case 66: status = strtol(pair->value, NULL, 10); break; default: break; } } switch (status) { case 12: b = gaim_find_buddy(gc->account, who); g_snprintf(buf, sizeof(buf), _("You have tried to ignore %s, but the " "user is on your buddy list. Clicking \"Yes\" " "will remove and ignore the buddy."), who); gaim_request_yes_no(gc, NULL, _("Ignore buddy?"), buf, 0, b, G_CALLBACK(ignore_buddy), G_CALLBACK(keep_buddy)); break; case 2: case 3: case 0: default: break; } } static void yahoo_process_authresp(GaimConnection *gc, struct yahoo_packet *pkt) { GSList *l = pkt->hash; int err = 0; char *msg; char *url = NULL; char *fullmsg; while (l) { struct yahoo_pair *pair = l->data; if (pair->key == 66) err = strtol(pair->value, NULL, 10); if (pair->key == 20) url = pair->value; l = l->next; } switch (err) { case 3: msg = g_strdup(_("Invalid username.")); break; case 13: msg = g_strdup(_("Incorrect password.")); break; case 14: msg = g_strdup(_("Your account is locked, please log in to the yahoo website.")); break; default: msg = g_strdup_printf(_("Unknown error number %d."), err); } if (url) fullmsg = g_strdup_printf("%s\n%s", msg, url); else fullmsg = g_strdup(msg); gaim_connection_error(gc, fullmsg); g_free(msg); g_free(fullmsg); } static void yahoo_process_addbuddy(GaimConnection *gc, struct yahoo_packet *pkt) { int err = 0; char *who = NULL; char *group = NULL; char *decoded_group; char *buf; struct yahoo_friend *f; struct yahoo_data *yd = gc->proto_data; GSList *l = pkt->hash; while (l) { struct yahoo_pair *pair = l->data; switch (pair->key) { case 66: err = strtol(pair->value, NULL, 10); break; case 7: who = pair->value; break; case 65: group = pair->value; break; } l = l->next; } if (!who) return; if (!group) group = ""; if (!err || (err == 2)) { /* 0 = ok, 2 = already on serv list */ if (!g_hash_table_lookup(yd->friends, gaim_normalize(gaim_connection_get_account(gc), who))) { f = yahoo_friend_new(); g_hash_table_insert(yd->friends, g_strdup(gaim_normalize(gaim_connection_get_account(gc), who)), f); yahoo_update_status(gc, who, f); } return; } decoded_group = yahoo_string_decode(gc, group, FALSE); buf = g_strdup_printf(_("Could not add buddy %s to group %s to the server list on account %s."), who, decoded_group, gaim_connection_get_display_name(gc)); gaim_notify_error(gc, NULL, _("Could not add buddy to server list"), buf); g_free(buf); g_free(decoded_group); } static void yahoo_packet_process(GaimConnection *gc, struct yahoo_packet *pkt) { switch (pkt->service) { case YAHOO_SERVICE_LOGON: case YAHOO_SERVICE_LOGOFF: case YAHOO_SERVICE_ISAWAY: case YAHOO_SERVICE_ISBACK: case YAHOO_SERVICE_GAMELOGON: case YAHOO_SERVICE_GAMELOGOFF: case YAHOO_SERVICE_CHATLOGON: case YAHOO_SERVICE_CHATLOGOFF: yahoo_process_status(gc, pkt); break; case YAHOO_SERVICE_NOTIFY: yahoo_process_notify(gc, pkt); break; case YAHOO_SERVICE_MESSAGE: case YAHOO_SERVICE_GAMEMSG: case YAHOO_SERVICE_CHATMSG: yahoo_process_message(gc, pkt); break; case YAHOO_SERVICE_SYSMESSAGE: yahoo_process_sysmessage(gc, pkt); break; case YAHOO_SERVICE_NEWMAIL: yahoo_process_mail(gc, pkt); break; case YAHOO_SERVICE_NEWCONTACT: yahoo_process_contact(gc, pkt); break; case YAHOO_SERVICE_AUTHRESP: yahoo_process_authresp(gc, pkt); break; case YAHOO_SERVICE_LIST: yahoo_process_list(gc, pkt); break; case YAHOO_SERVICE_AUTH: yahoo_process_auth(gc, pkt); break; case YAHOO_SERVICE_ADDBUDDY: yahoo_process_addbuddy(gc, pkt); break; case YAHOO_SERVICE_IGNORECONTACT: yahoo_process_ignore(gc, pkt); break; case YAHOO_SERVICE_CONFINVITE: case YAHOO_SERVICE_CONFADDINVITE: yahoo_process_conference_invite(gc, pkt); break; case YAHOO_SERVICE_CONFDECLINE: yahoo_process_conference_decline(gc, pkt); break; case YAHOO_SERVICE_CONFLOGON: yahoo_process_conference_logon(gc, pkt); break; case YAHOO_SERVICE_CONFLOGOFF: yahoo_process_conference_logoff(gc, pkt); break; case YAHOO_SERVICE_CONFMSG: yahoo_process_conference_message(gc, pkt); break; case YAHOO_SERVICE_CHATONLINE: yahoo_process_chat_online(gc, pkt); break; case YAHOO_SERVICE_CHATLOGOUT: yahoo_process_chat_logout(gc, pkt); break; case YAHOO_SERVICE_CHATGOTO: yahoo_process_chat_goto(gc, pkt); break; case YAHOO_SERVICE_CHATJOIN: yahoo_process_chat_join(gc, pkt); break; case YAHOO_SERVICE_CHATLEAVE: /* XXX is this right? */ case YAHOO_SERVICE_CHATEXIT: yahoo_process_chat_exit(gc, pkt); break; case YAHOO_SERVICE_CHATINVITE: /* XXX never seen this one, might not do it right */ case YAHOO_SERVICE_CHATADDINVITE: yahoo_process_chat_addinvite(gc, pkt); break; case YAHOO_SERVICE_COMMENT: yahoo_process_chat_message(gc, pkt); break; case YAHOO_SERVICE_P2PFILEXFER: case YAHOO_SERVICE_FILETRANSFER: yahoo_process_filetransfer(gc, pkt); break; default: gaim_debug(GAIM_DEBUG_ERROR, "yahoo", "Unhandled service 0x%02x\n", pkt->service); break; } } static void yahoo_pending(gpointer data, gint source, GaimInputCondition cond) { GaimConnection *gc = data; struct yahoo_data *yd = gc->proto_data; char buf[1024]; int len; len = read(yd->fd, buf, sizeof(buf)); if (len <= 0) { gaim_connection_error(gc, _("Unable to read")); return; } yd->rxqueue = g_realloc(yd->rxqueue, len + yd->rxlen); memcpy(yd->rxqueue + yd->rxlen, buf, len); yd->rxlen += len; while (1) { struct yahoo_packet *pkt; int pos = 0; int pktlen; if (yd->rxlen < YAHOO_PACKET_HDRLEN) return; pos += 4; /* YMSG */ pos += 2; pos += 2; pktlen = yahoo_get16(yd->rxqueue + pos); pos += 2; gaim_debug(GAIM_DEBUG_MISC, "yahoo", "%d bytes to read, rxlen is %d\n", pktlen, yd->rxlen); if (yd->rxlen < (YAHOO_PACKET_HDRLEN + pktlen)) return; yahoo_packet_dump(yd->rxqueue, YAHOO_PACKET_HDRLEN + pktlen); pkt = yahoo_packet_new(0, 0, 0); pkt->service = yahoo_get16(yd->rxqueue + pos); pos += 2; pkt->status = yahoo_get32(yd->rxqueue + pos); pos += 4; gaim_debug(GAIM_DEBUG_MISC, "yahoo", "Yahoo Service: 0x%02x Status: %d\n", pkt->service, pkt->status); pkt->id = yahoo_get32(yd->rxqueue + pos); pos += 4; yahoo_packet_read(pkt, yd->rxqueue + pos, pktlen); yd->rxlen -= YAHOO_PACKET_HDRLEN + pktlen; if (yd->rxlen) { char *tmp = g_memdup(yd->rxqueue + YAHOO_PACKET_HDRLEN + pktlen, yd->rxlen); g_free(yd->rxqueue); yd->rxqueue = tmp; } else { g_free(yd->rxqueue); yd->rxqueue = NULL; } yahoo_packet_process(gc, pkt); yahoo_packet_free(pkt); } } #ifndef YAHOO_WEBMESSENGER static void yahoo_got_connected(gpointer data, gint source, GaimInputCondition cond) { GaimConnection *gc = data; struct yahoo_data *yd; struct yahoo_packet *pkt; if (!g_list_find(gaim_connections_get_all(), gc)) { close(source); return; } if (source < 0) { gaim_connection_error(gc, _("Unable to connect.")); return; } yd = gc->proto_data; yd->fd = source; pkt = yahoo_packet_new(YAHOO_SERVICE_AUTH, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_normalize(gc->account, gaim_account_get_username(gaim_connection_get_account(gc)))); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); gc->inpa = gaim_input_add(yd->fd, GAIM_INPUT_READ, yahoo_pending, gc); } #endif #ifdef YAHOO_WEBMESSENGER static void yahoo_got_web_connected(gpointer data, gint source, GaimInputCondition cond) { GaimConnection *gc = data; struct yahoo_data *yd; struct yahoo_packet *pkt; if (!g_list_find(gaim_connections_get_all(), gc)) { close(source); return; } if (source < 0) { gaim_connection_error(gc, _("Unable to connect.")); return; } yd = gc->proto_data; yd->fd = source; pkt = yahoo_packet_new(YAHOO_SERVICE_WEBLOGIN, YAHOO_STATUS_WEBLOGIN, 0); yahoo_packet_hash(pkt, 0, gaim_normalize(gc->account, gaim_account_get_username(gaim_connection_get_account(gc)))); yahoo_packet_hash(pkt, 1, gaim_normalize(gc->account, gaim_account_get_username(gaim_connection_get_account(gc)))); yahoo_packet_hash(pkt, 6, yd->auth); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(yd->auth); gc->inpa = gaim_input_add(yd->fd, GAIM_INPUT_READ, yahoo_pending, gc); } static void yahoo_web_pending(gpointer data, gint source, GaimInputCondition cond) { GaimConnection *gc = data; GaimAccount *account = gaim_connection_get_account(gc); struct yahoo_data *yd = gc->proto_data; char buf[1024], buf2[256], *i = buf, *r = buf2, *rend; int len, o = 0; len = read(source, buf, sizeof(buf)-1); if (len <= 0 || strncmp(buf, "HTTP/1.0 302", strlen("HTTP/1.0 302"))) { gaim_connection_error(gc, _("Unable to read")); return; } buf[sizeof(buf)-1] = '\0'; buf2[0] = '\0'; rend = r + sizeof(buf2); while ((i = strstr(i, "Set-Cookie: ")) && o < 2) { i += strlen("Set-Cookie: "); for (;*i != ';' && r < rend; r++, i++) { *r = *i; } if (r >= rend-2) { *r = '\0'; r = buf2; } *r=';'; r++; *r=' '; r++; o++; } /* Get rid of that "; " */ if (r > buf2) { *(r-2) = '\0'; } yd->auth = g_strdup(buf2); gaim_input_remove(gc->inpa); close(source); /* Now we have our cookies to login with. I'll go get the milk. */ if (gaim_proxy_connect(account, "wcs2.msg.dcn.yahoo.com", gaim_account_get_int(account, "port", YAHOO_PAGER_PORT), yahoo_got_web_connected, gc) != 0) { gaim_connection_error(gc, _("Connection problem")); return; } } static void yahoo_got_cookies(gpointer data, gint source, GaimInputCondition cond) { GaimConnection *gc = data; struct yahoo_data *yd = gc->proto_data; if (source < 0) { gaim_connection_error(gc, _("Unable to connect.")); return; } write(source, yd->auth, strlen(yd->auth)); g_free(yd->auth); gc->inpa = gaim_input_add(source, GAIM_INPUT_READ, yahoo_web_pending, gc); } static void yahoo_login_page_hash_iter(const char *key, const char *val, GString *url) { if (!strcmp(key, "passwd")) return; url = g_string_append_c(url, '&'); url = g_string_append(url, key); url = g_string_append_c(url, '='); if (!strcmp(key, ".save") || !strcmp(key, ".js")) url = g_string_append_c(url, '1'); else if (!strcmp(key, ".challenge")) url = g_string_append(url, val); else url = g_string_append(url, gaim_url_encode(val)); } static GHashTable *yahoo_login_page_hash(const char *buf, size_t len) { GHashTable *hash = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); const char *c = buf; char *d; char name[64], value[64]; int count = sizeof(name)-1; while ((c < (buf + len)) && (c = strstr(c, "<input "))) { c = strstr(c, "name=\"") + strlen("name=\""); for (d = name; *c!='"' && count; c++, d++, count--) *d = *c; *d = '\0'; count = sizeof(value)-1; d = strstr(c, "value=\"") + strlen("value=\""); if (strchr(c, '>') < d) break; for (c = d, d = value; *c!='"' && count; c++, d++, count--) *d = *c; *d = '\0'; g_hash_table_insert(hash, g_strdup(name), g_strdup(value)); } return hash; } static void yahoo_login_page_cb(void *user_data, const char *buf, size_t len) { GaimConnection *gc = (GaimConnection *)user_data; GaimAccount *account = gaim_connection_get_account(gc); struct yahoo_data *yd = gc->proto_data; const char *sn = gaim_account_get_username(account); const char *pass = gaim_account_get_password(account); GHashTable *hash = yahoo_login_page_hash(buf, len); GString *url = g_string_new("GET /config/login?login="); char md5[33], *hashp = md5, *chal; int i; md5_byte_t result[16]; md5_state_t ctx; url = g_string_append(url, sn); url = g_string_append(url, "&passwd="); md5_init(&ctx); md5_append(&ctx, pass, strlen(pass)); md5_finish(&ctx, result); for (i = 0; i < 16; ++i) { g_snprintf(hashp, 3, "%02x", result[i]); hashp += 2; } chal = g_strconcat(md5, g_hash_table_lookup(hash, ".challenge"), NULL); md5_init(&ctx); md5_append(&ctx, chal, strlen(chal)); md5_finish(&ctx, result); hashp = md5; for (i = 0; i < 16; ++i) { g_snprintf(hashp, 3, "%02x", result[i]); hashp += 2; } /* md5_init(&ctx); md5_append(&ctx, md5, strlen(md5)); md5_finish(&ctx, result); hashp = md5; for (i = 0; i < 16; ++i) { g_snprintf(hashp, 3, "%02x", result[i]); hashp += 2; } */ g_free(chal); url = g_string_append(url, md5); g_hash_table_foreach(hash, (GHFunc)yahoo_login_page_hash_iter, url); url = g_string_append(url, "&.hash=1&.md5=1 HTTP/1.1\r\n" "Host: login.yahoo.com\r\n\r\n"); g_hash_table_destroy(hash); yd->auth = g_string_free(url, FALSE); if (gaim_proxy_connect(account, "login.yahoo.com", 80, yahoo_got_cookies, gc) != 0) { gaim_connection_error(gc, _("Connection problem")); return; } } #endif /* YAHOO_WEBMESSENGER */ #ifndef YAHOO_WEBMESSENGER static void yahoo_server_check(GaimAccount *account) { const char *server; server = gaim_account_get_string(account, "server", YAHOO_PAGER_HOST); if (strcmp(server, "scs.yahoo.com") == 0) gaim_account_set_string(account, "server", YAHOO_PAGER_HOST); } #endif static void yahoo_login(GaimAccount *account) { GaimConnection *gc = gaim_account_get_connection(account); struct yahoo_data *yd = gc->proto_data = g_new0(struct yahoo_data, 1); gc->flags |= GAIM_CONNECTION_HTML | GAIM_CONNECTION_NO_BGCOLOR; gaim_connection_update_progress(gc, _("Connecting"), 1, 2); yd->fd = -1; yd->friends = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, yahoo_friend_free); yd->confs = NULL; yd->conf_id = 2; #ifndef YAHOO_WEBMESSENGER yahoo_server_check(account); if (gaim_proxy_connect(account, gaim_account_get_string(account, "server", YAHOO_PAGER_HOST), gaim_account_get_int(account, "port", YAHOO_PAGER_PORT), yahoo_got_connected, gc) != 0) { gaim_connection_error(gc, _("Connection problem")); return; } #else gaim_url_fetch(WEBMESSENGER_URL, TRUE, "Gaim/" VERSION, FALSE, yahoo_login_page_cb, gc); #endif } static void yahoo_close(GaimConnection *gc) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; g_hash_table_destroy(yd->friends); g_slist_free(yd->confs); if (yd->chat_name) g_free(yd->chat_name); if (yd->cookie_y) g_free(yd->cookie_y); if (yd->cookie_t) g_free(yd->cookie_t); if (yd->fd >= 0) close(yd->fd); if (yd->rxqueue) g_free(yd->rxqueue); yd->rxlen = 0; if (gc->inpa) gaim_input_remove(gc->inpa); g_free(yd); } static const char *yahoo_list_icon(GaimAccount *a, GaimBuddy *b) { return "yahoo"; } static void yahoo_list_emblems(GaimBuddy *b, char **se, char **sw, char **nw, char **ne) { int i = 0; char *emblems[4] = {NULL,NULL,NULL,NULL}; GaimAccount *account; GaimConnection *gc; struct yahoo_data *yd; struct yahoo_friend *f; if (!b || !(account = b->account) || !(gc = gaim_account_get_connection(account)) || !(yd = gc->proto_data)) return; f = g_hash_table_lookup(yd->friends, b->name); if (!f) { *se = "notauthorized"; return; } if (b->present == GAIM_BUDDY_OFFLINE) { *se = "offline"; return; } else { if (f->away) emblems[i++] = "away"; if (f->sms) emblems[i++] = "wireless"; if (f->game) emblems[i++] = "game"; } *se = emblems[0]; *sw = emblems[1]; *nw = emblems[2]; *ne = emblems[3]; } static char *yahoo_get_status_string(enum yahoo_status a) { switch (a) { case YAHOO_STATUS_BRB: return _("Be Right Back"); case YAHOO_STATUS_BUSY: return _("Busy"); case YAHOO_STATUS_NOTATHOME: return _("Not At Home"); case YAHOO_STATUS_NOTATDESK: return _("Not At Desk"); case YAHOO_STATUS_NOTINOFFICE: return _("Not In Office"); case YAHOO_STATUS_ONPHONE: return _("On The Phone"); case YAHOO_STATUS_ONVACATION: return _("On Vacation"); case YAHOO_STATUS_OUTTOLUNCH: return _("Out To Lunch"); case YAHOO_STATUS_STEPPEDOUT: return _("Stepped Out"); case YAHOO_STATUS_INVISIBLE: return _("Invisible"); case YAHOO_STATUS_IDLE: return _("Idle"); case YAHOO_STATUS_OFFLINE: return _("Offline"); default: return _("Online"); } } static void yahoo_initiate_conference(GaimConnection *gc, const char *name) { GHashTable *components; struct yahoo_data *yd; int id; yd = gc->proto_data; id = yd->conf_id; components = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free); g_hash_table_replace(components, g_strdup("room"), g_strdup_printf("%s-%d", gaim_connection_get_display_name(gc), id)); g_hash_table_replace(components, g_strdup("topic"), g_strdup("Join my conference...")); g_hash_table_replace(components, g_strdup("type"), g_strdup("Conference")); yahoo_c_join(gc, components); g_hash_table_destroy(components); yahoo_c_invite(gc, id, "Join my conference...", name); } static void yahoo_game(GaimConnection *gc, const char *name) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; char *game = NULL; char *t; char url[256]; struct yahoo_friend *f; f = g_hash_table_lookup(yd->friends, name); if (!f) return; game = f->game; if (!game) return; t = game = g_strdup(strstr(game, "ante?room=")); while (*t != '\t') t++; *t = 0; g_snprintf(url, sizeof url, "http://games.yahoo.com/games/%s", game); gaim_notify_uri(gc, url); g_free(game); } static char *yahoo_status_text(GaimBuddy *b) { struct yahoo_data *yd = (struct yahoo_data*)b->account->gc->proto_data; struct yahoo_friend *f = NULL; char *stripped = NULL; f = g_hash_table_lookup(yd->friends, b->name); if (!f) return g_strdup(_("Not on server list")); switch (f->status) { case YAHOO_STATUS_AVAILABLE: return NULL; case YAHOO_STATUS_IDLE: if (f->idle == -1) return g_strdup(yahoo_get_status_string(f->status)); return NULL; case YAHOO_STATUS_CUSTOM: if (!f->msg) return NULL; stripped = gaim_markup_strip_html(f->msg); if (stripped) { char *ret = g_markup_escape_text(stripped, strlen(stripped)); g_free(stripped); return ret; } return NULL; default: return g_strdup(yahoo_get_status_string(f->status)); } } static char *yahoo_tooltip_text(GaimBuddy *b) { struct yahoo_data *yd = (struct yahoo_data*)b->account->gc->proto_data; struct yahoo_friend *f; char *escaped, *status, *ret; f = g_hash_table_lookup(yd->friends, b->name); if (!f) status = g_strdup(_("Not on server list")); else switch (f->status) { case YAHOO_STATUS_IDLE: if (f->idle == -1) { status = g_strdup(yahoo_get_status_string(f->status)); break; } return NULL; case YAHOO_STATUS_CUSTOM: if (!f->msg) return NULL; status = gaim_markup_strip_html(f->msg); break; default: status = g_strdup(yahoo_get_status_string(f->status)); break; } escaped = g_markup_escape_text(status, strlen(status)); ret = g_strdup_printf(_("<b>Status:</b> %s"), escaped); g_free(status); g_free(escaped); return ret; } static void yahoo_addbuddyfrommenu_cb(GaimConnection *gc, const char *who) { yahoo_add_buddy(gc, who, NULL); } static GList *yahoo_buddy_menu(GaimConnection *gc, const char *who) { GList *m = NULL; struct proto_buddy_menu *pbm; struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; static char buf2[1024]; struct yahoo_friend *f; f = g_hash_table_lookup(yd->friends, who); if (!f) { pbm = g_new0(struct proto_buddy_menu, 1); pbm->label = _("Add Buddy"); pbm->callback = yahoo_addbuddyfrommenu_cb; pbm->gc = gc; m = g_list_append(m, pbm); return m; } if (f->status == YAHOO_STATUS_OFFLINE) return NULL; pbm = g_new0(struct proto_buddy_menu, 1); pbm->label = _("Join in Chat"); pbm->callback = yahoo_chat_goto; pbm->gc = gc; m = g_list_append(m, pbm); pbm = g_new0(struct proto_buddy_menu, 1); pbm->label = _("Initiate Conference"); pbm->callback = yahoo_initiate_conference; pbm->gc = gc; m = g_list_append(m, pbm); /* FIXME: remove this when the ui does it for us. */ pbm = g_new0(struct proto_buddy_menu, 1); pbm->label = _("Send File"); pbm->callback = yahoo_ask_send_file; pbm->gc = gc; m = g_list_append(m, pbm); if (f->game) { char *game = f->game; char *room; char *t; if (!game) return m; pbm = g_new0(struct proto_buddy_menu, 1); if (!(room = strstr(game, "&follow="))) /* skip ahead to the url */ return m; while (*room && *room != '\t') /* skip to the tab */ room++; t = room++; /* room as now at the name */ while (*t != '\n') t++; /* replace the \n with a space */ *t = ' '; g_snprintf(buf2, sizeof buf2, "%s", room); pbm->label = buf2; pbm->callback = yahoo_game; pbm->gc = gc; m = g_list_append(m, pbm); } return m; } static void yahoo_act_id(GaimConnection *gc, const char *entry) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt = yahoo_packet_new(YAHOO_SERVICE_IDACT, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 3, entry); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); gaim_connection_set_display_name(gc, entry); } static void yahoo_show_act_id(GaimConnection *gc) { gaim_request_input(gc, NULL, _("Active which ID?"), NULL, gaim_connection_get_display_name(gc), FALSE, FALSE, _("OK"), G_CALLBACK(yahoo_act_id), _("Cancel"), NULL, gc); } static void yahoo_show_chat_goto(GaimConnection *gc) { gaim_request_input(gc, NULL, _("Join who in chat?"), NULL, "", FALSE, FALSE, _("OK"), G_CALLBACK(yahoo_chat_goto), _("Cancel"), NULL, gc); } static GList *yahoo_actions(GaimConnection *gc) { GList *m = NULL; struct proto_actions_menu *pam; pam = g_new0(struct proto_actions_menu, 1); pam->label = _("Activate ID..."); pam->callback = yahoo_show_act_id; pam->gc = gc; m = g_list_append(m, pam); pam = g_new0(struct proto_actions_menu, 1); pam->label = _("Join user in chat..."); pam->callback = yahoo_show_chat_goto; pam->gc = gc; m = g_list_append(m, pam); return m; } static int yahoo_send_im(GaimConnection *gc, const char *who, const char *what, GaimConvImFlags flags) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt = yahoo_packet_new(YAHOO_SERVICE_MESSAGE, YAHOO_STATUS_OFFLINE, 0); char *msg = yahoo_html_to_codes(what); char *msg2; gboolean utf8 = TRUE; msg2 = yahoo_string_encode(gc, msg, &utf8); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 5, who); if (utf8) yahoo_packet_hash(pkt, 97, "1"); yahoo_packet_hash(pkt, 14, msg2); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(msg); g_free(msg2); return 1; } int yahoo_send_typing(GaimConnection *gc, const char *who, int typ) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt = yahoo_packet_new(YAHOO_SERVICE_NOTIFY, YAHOO_STATUS_TYPING, 0); yahoo_packet_hash(pkt, 49, "TYPING"); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 14, " "); yahoo_packet_hash(pkt, 13, typ == GAIM_TYPING ? "1" : "0"); yahoo_packet_hash(pkt, 5, who); yahoo_packet_hash(pkt, 1002, "1"); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); return 0; } static void yahoo_set_away(GaimConnection *gc, const char *state, const char *msg) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; struct yahoo_packet *pkt; int service; char s[4]; char *conv_msg = NULL; if (gc->away) { g_free(gc->away); gc->away = NULL; } if (msg) { yd->current_status = YAHOO_STATUS_CUSTOM; gc->away = g_strndup(msg, YAHOO_MAX_STATUS_MESSAGE_LENGTH); } else if (state) { gc->away = g_strdup(""); if (!strcmp(state, _("Available"))) { yd->current_status = YAHOO_STATUS_AVAILABLE; } else if (!strcmp(state, _("Be Right Back"))) { yd->current_status = YAHOO_STATUS_BRB; } else if (!strcmp(state, _("Busy"))) { yd->current_status = YAHOO_STATUS_BUSY; } else if (!strcmp(state, _("Not At Home"))) { yd->current_status = YAHOO_STATUS_NOTATHOME; } else if (!strcmp(state, _("Not At Desk"))) { yd->current_status = YAHOO_STATUS_NOTATDESK; } else if (!strcmp(state, _("Not In Office"))) { yd->current_status = YAHOO_STATUS_NOTINOFFICE; } else if (!strcmp(state, _("On The Phone"))) { yd->current_status = YAHOO_STATUS_ONPHONE; } else if (!strcmp(state, _("On Vacation"))) { yd->current_status = YAHOO_STATUS_ONVACATION; } else if (!strcmp(state, _("Out To Lunch"))) { yd->current_status = YAHOO_STATUS_OUTTOLUNCH; } else if (!strcmp(state, _("Stepped Out"))) { yd->current_status = YAHOO_STATUS_STEPPEDOUT; } else if (!strcmp(state, _("Invisible"))) { yd->current_status = YAHOO_STATUS_INVISIBLE; } else if (!strcmp(state, GAIM_AWAY_CUSTOM)) { /* this should never happen? */ if (gc->is_idle) { yd->current_status = YAHOO_STATUS_IDLE; } else { yd->current_status = YAHOO_STATUS_AVAILABLE; } } } else if (gc->is_idle) { yd->current_status = YAHOO_STATUS_IDLE; } else { yd->current_status = YAHOO_STATUS_AVAILABLE; } if (yd->current_status == YAHOO_STATUS_AVAILABLE) service = YAHOO_SERVICE_ISBACK; else service = YAHOO_SERVICE_ISAWAY; pkt = yahoo_packet_new(service, YAHOO_STATUS_AVAILABLE, 0); g_snprintf(s, sizeof(s), "%d", yd->current_status); yahoo_packet_hash(pkt, 10, s); if ((yd->current_status == YAHOO_STATUS_CUSTOM) && gc->away) { conv_msg = yahoo_string_encode(gc, gc->away, NULL); yahoo_packet_hash(pkt, 19, conv_msg); } if ((yd->current_status != YAHOO_STATUS_AVAILABLE) && (yd->current_status != YAHOO_STATUS_IDLE)) { if (gc->is_idle) yahoo_packet_hash(pkt, 47, "2"); else yahoo_packet_hash(pkt, 47, "1"); } yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); if (conv_msg) g_free(conv_msg); } static void yahoo_set_idle(GaimConnection *gc, int idle) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt = NULL; char *msg = NULL; if (idle && yd->current_status == YAHOO_STATUS_AVAILABLE) { pkt = yahoo_packet_new(YAHOO_SERVICE_ISAWAY, YAHOO_STATUS_AVAILABLE, 0); yd->current_status = YAHOO_STATUS_IDLE; } else if (!idle && yd->current_status == YAHOO_STATUS_IDLE) { pkt = yahoo_packet_new(YAHOO_SERVICE_ISAWAY, YAHOO_STATUS_AVAILABLE, 0); yd->current_status = YAHOO_STATUS_AVAILABLE; } else { pkt = yahoo_packet_new(YAHOO_SERVICE_ISAWAY, YAHOO_STATUS_AVAILABLE, 0); } if (pkt) { char buf[4]; g_snprintf(buf, sizeof(buf), "%d", yd->current_status); yahoo_packet_hash(pkt, 10, buf); if (gc->away && yd->current_status == YAHOO_STATUS_CUSTOM) { msg = yahoo_string_encode(gc, gc->away, NULL); yahoo_packet_hash(pkt, 19, msg); if (idle) yahoo_packet_hash(pkt, 47, "2"); else yahoo_packet_hash(pkt, 47, "1"); /* fixme when available messages are possible */ } else if (idle && (yd->current_status != YAHOO_STATUS_AVAILABLE) && (yd->current_status != YAHOO_STATUS_IDLE)) { yahoo_packet_hash(pkt, 47, "2"); } else if (!idle && (yd->current_status != YAHOO_STATUS_AVAILABLE) && (yd->current_status != YAHOO_STATUS_IDLE)) { yahoo_packet_hash(pkt, 47, "1"); } yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); } if (msg) g_free(msg); } static GList *yahoo_away_states(GaimConnection *gc) { GList *m = NULL; m = g_list_append(m, _("Available")); m = g_list_append(m, _("Be Right Back")); m = g_list_append(m, _("Busy")); m = g_list_append(m, _("Not At Home")); m = g_list_append(m, _("Not At Desk")); m = g_list_append(m, _("Not In Office")); m = g_list_append(m, _("On The Phone")); m = g_list_append(m, _("On Vacation")); m = g_list_append(m, _("Out To Lunch")); m = g_list_append(m, _("Stepped Out")); m = g_list_append(m, _("Invisible")); m = g_list_append(m, GAIM_AWAY_CUSTOM); return m; } static void yahoo_keepalive(GaimConnection *gc) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt = yahoo_packet_new(YAHOO_SERVICE_PING, YAHOO_STATUS_AVAILABLE, 0); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); if (!yd->chat_online) return; pkt = yahoo_packet_new(YAHOO_SERVICE_CHATPING, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 109, gaim_connection_get_display_name(gc)); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); } static void yahoo_add_buddy(GaimConnection *gc, const char *who, GaimGroup *foo) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; struct yahoo_packet *pkt; GaimGroup *g; char *group = NULL; char *group2 = NULL; if (!yd->logged_in) return; if (foo) group = foo->name; if (!group) { g = gaim_find_buddys_group(gaim_find_buddy(gc->account, who)); if (g) group = g->name; else group = "Buddies"; } group2 = yahoo_string_encode(gc, group, NULL); pkt = yahoo_packet_new(YAHOO_SERVICE_ADDBUDDY, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 65, group2); yahoo_packet_hash(pkt, 14, ""); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(group2); } static void yahoo_remove_buddy(GaimConnection *gc, const char *who, const char *group) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; struct yahoo_friend *f; struct yahoo_packet *pkt; GSList *buddies, *l; GaimGroup *g; gboolean remove = TRUE; char *cg; if (!(f = g_hash_table_lookup(yd->friends, who))) return; buddies = gaim_find_buddies(gaim_connection_get_account(gc), who); for (l = buddies; l; l = l->next) { g = gaim_find_buddys_group(l->data); if (gaim_utf8_strcasecmp(group, g->name)) { remove = FALSE; break; } } g_slist_free(buddies); if (remove) g_hash_table_remove(yd->friends, who); cg = yahoo_string_encode(gc, group, NULL); pkt = yahoo_packet_new(YAHOO_SERVICE_REMBUDDY, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 65, cg); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(cg); } static void yahoo_add_deny(GaimConnection *gc, const char *who) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; struct yahoo_packet *pkt; if (!yd->logged_in) return; /* It seems to work better without this */ /* if (gc->account->perm_deny != 4) return; */ if (!who || who[0] == '\0') return; pkt = yahoo_packet_new(YAHOO_SERVICE_IGNORECONTACT, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 13, "1"); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); } static void yahoo_rem_deny(GaimConnection *gc, const char *who) { struct yahoo_data *yd = (struct yahoo_data *)gc->proto_data; struct yahoo_packet *pkt; if (!yd->logged_in) return; if (!who || who[0] == '\0') return; pkt = yahoo_packet_new(YAHOO_SERVICE_IGNORECONTACT, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 13, "2"); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); } static void yahoo_set_permit_deny(GaimConnection *gc) { GaimAccount *acct; GSList *deny; acct = gc->account; switch (acct->perm_deny) { case 1: case 3: case 5: for (deny = acct->deny;deny;deny = deny->next) yahoo_rem_deny(gc, deny->data); break; case 4: for (deny = acct->deny;deny;deny = deny->next) yahoo_add_deny(gc, deny->data); break; case 2: default: break; } } static gboolean yahoo_unload_plugin(GaimPlugin *plugin) { yahoo_dest_colorht(); return TRUE; } static void yahoo_got_info(void *data, const char *url_text, size_t len) { YahooGetInfoData *info_data = (YahooGetInfoData *)data; char *stripped, *p; char buf[1024]; gboolean found = FALSE; char *url_buffer; GString *s; int stripped_len; gaim_debug_info("yahoo", "In yahoo_got_info\n"); /* we failed to grab the profile URL */ if (url_text == NULL || strcmp(url_text, "") == 0) { gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, _("<html><body><b>Error retrieving profile</b></body></html>"), NULL, NULL); g_free(info_data->name); g_free(info_data); return; } /* 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) { g_snprintf(buf, 1024, "<html><body>%s%s<a href=\"%s%s\">%s%s</a></body></html>", _("<b>Sorry, profiles marked as containing adult content are not supported at this time.</b><br><br>\n"), _("If you wish to view this profile, you will need to visit this link in your web browser<br>"), YAHOO_PROFILE_URL, info_data->name, YAHOO_PROFILE_URL, info_data->name); gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, buf, NULL, NULL); g_free(info_data->name); g_free(info_data); return; } /* at the moment we don't support profile pages with languages other than * english. the problem is, that every user may choose his/her own profile * language. this language has nothing to do with the preferences of the * user which looks at the profile */ p = strstr(url_text, "Last Updated:"); if (!p) { p = strstr(url_text, "Last Updated "); } if (!p) { g_snprintf(buf, 1024, "<html><body>%s%s<a href=\"%s%s\">%s%s</a></body></html>", _("<b>Sorry, non-English profiles are not supported at this time.</b><br><br>\n"), _("If you wish to view this profile, you will need to visit this link in your web browser<br>"), YAHOO_PROFILE_URL, info_data->name, YAHOO_PROFILE_URL, info_data->name); gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, buf, NULL, NULL); g_free(info_data->name); g_free(info_data); return; } url_buffer = g_strdup(url_text); /* * gaim_markup_strip_html() doesn't strip out character entities like * and · */ while ((p = strstr(url_buffer, " ")) != NULL) { memmove(p, p + 6, strlen(p + 6)); url_buffer[strlen(url_buffer) - 6] = '\0'; } while ((p = strstr(url_buffer, "·")) != NULL) { memmove(p, p + 6, strlen(p + 6)); url_buffer[strlen(url_buffer) - 6] = '\0'; } /* nuke the nasty \r's */ while ((p = strchr(url_buffer, '\r')) != NULL) { memmove(p, p + 1, strlen(p + 1)); url_buffer[strlen(url_buffer) - 1] = '\0'; } /* nuke the html, it's easier than trying to parse the horrid stuff */ stripped = gaim_markup_strip_html(url_buffer); stripped_len = strlen(stripped); gaim_debug_misc("yahoo", "stripped = %p\n", stripped); gaim_debug_misc("yahoo", "url_buffer = %p\n", url_buffer); /* gonna re-use the memory we've already got for url_buffer */ /* no we're not */ s = g_string_sized_new(strlen(url_buffer)); g_string_append(s, "<html><body>\n"); /* 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 (!gaim_markup_extract_info_field(stripped, stripped_len, s, "Yahoo! ID:", 2, "\n", 0, NULL, _("Yahoo! ID"), 0, NULL)) g_string_append_printf(s, "<b>%s:</b> %s<br>", _("Yahoo! ID"), info_data->name); /* extract their Email address and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "My Email", 5, "\n", 0, "Private", _("Email"), 0, NULL); /* extract the Nickname if it exists */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Nickname:", 1, "\n", '\n', NULL, _("Nickname"), 0, NULL); /* extract their RealName and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "RealName:", 1, "\n", '\n', NULL, _("Realname"), 0, NULL); /* extract their Location and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Location:", 2, "\n", '\n', NULL, _("Location"), 0, NULL); /* extract their Age and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Age:", 3, "\n", '\n', NULL, _("Age"), 0, NULL); /* extract their MaritalStatus and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "MaritalStatus:", 3, "\n", '\n', "No Answer", _("Marital Status"), 0, NULL); /* extract their Gender and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Gender:", 3, "\n", '\n', "No Answer", _("Gender"), 0, NULL); /* extract their Occupation and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Occupation:", 2, "\n", '\n', NULL, _("Occupation"), 0, 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. */ if (!gaim_markup_extract_info_field(stripped, stripped_len, s, "Hobbies:", 1, "Latest News", '\n', NULL, _("Hobbies"), 0, NULL)) { if (!gaim_markup_extract_info_field(stripped, stripped_len, s, "Hobbies:", 1, "Favorite Quote", '\n', NULL, _("Hobbies"), 0, NULL)) { found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Hobbies:", 1, "Links", '\n', NULL, _("Hobbies"), 0, NULL); } else found = TRUE; } else found = TRUE; if (!gaim_markup_extract_info_field(stripped, stripped_len, s, "Latest News:", 1, "Favorite Quote", '\n', NULL, _("Latest News"), 0, NULL)) { found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Latest News:", 1, "Links", '\n', NULL, _("Latest News"), 0, NULL); } else found = TRUE; found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Favorite Quote:", 0, "Links", '\n', NULL, _("Favorite Quote"), 0, NULL); /* Home Page will either be "No home page specified", * or "Home Page: " and a link. */ p = strstr(stripped, "No home page specified"); if(!p) { found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Home Page:", 1, " ", 0, NULL, _("Home Page"), 1, 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 = strstr(stripped,"No cool link specified"); if (!p) { if (gaim_markup_extract_info_field(stripped, stripped_len, s, "Cool Link 1:", 1, " ", 0, NULL, _("Cool Link 1"), 1, NULL)) { found = TRUE; if (gaim_markup_extract_info_field(stripped, stripped_len, s, "Cool Link 2:", 1, " ", 0, NULL, _("Cool Link 2"), 1, NULL)) gaim_markup_extract_info_field(stripped, stripped_len, s, "Cool Link 3:", 1, " ", 0, NULL, _("Cool Link 3"), 1, NULL); } } /* see if Member Since is there, and if so, extract it. */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Member Since:", 1, "Last Updated:", '\n', NULL, _("Member Since"), 0, NULL); /* extract the Last Updated date and put it in */ found |= gaim_markup_extract_info_field(stripped, stripped_len, s, "Last Updated:", 1, "\n", '\n', NULL, _("Last Updated"), 0, NULL); /* finish off the html */ g_string_append(s, "</body></html>\n"); g_free(stripped); if(found) { /* show it to the user */ gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, s->str, NULL, NULL); } else { char *primary; primary = g_strdup_printf(_("User information for %s unavailable"), info_data->name); gaim_notify_error(info_data->gc, NULL, primary, _("The user's profile is empty.")); g_free(primary); } g_free(url_buffer); g_string_free(s, TRUE); g_free(info_data->name); g_free(info_data); } static void yahoo_get_info(GaimConnection *gc, const char *name) { YahooGetInfoData *data; char *url; data = g_new0(YahooGetInfoData, 1); data->gc = gc; data->name = g_strdup(name); url = g_strdup_printf("%s%s", YAHOO_PROFILE_URL, name); gaim_url_fetch(url, FALSE, NULL, FALSE, yahoo_got_info, data); g_free(url); } static void yahoo_change_buddys_group(GaimConnection *gc, const char *who, const char *old_group, const char *new_group) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt; char *gpn, *gpo; /* Step 0: If they aren't on the server list anyway, * don't bother letting the server know. */ if (!g_hash_table_lookup(yd->friends, who)) return; /* If old and new are the same, we would probably * end up deleting the buddy, which would be bad. * This might happen because of the charset conversation. */ gpn = yahoo_string_encode(gc, new_group, NULL); gpo = yahoo_string_encode(gc, old_group, NULL); if (!strcmp(gpn, gpo)) { g_free(gpn); g_free(gpo); return; } /* Step 1: Add buddy to new group. */ pkt = yahoo_packet_new(YAHOO_SERVICE_ADDBUDDY, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 65, gpn); yahoo_packet_hash(pkt, 14, ""); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); /* Step 2: Remove buddy from old group */ pkt = yahoo_packet_new(YAHOO_SERVICE_REMBUDDY, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 7, who); yahoo_packet_hash(pkt, 65, gpo); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(gpn); g_free(gpo); } static void yahoo_rename_group(GaimConnection *gc, const char *old_group, const char *new_group, GList *whocares) { struct yahoo_data *yd = gc->proto_data; struct yahoo_packet *pkt; char *gpn, *gpo; gpn = yahoo_string_encode(gc, new_group, NULL); gpo = yahoo_string_encode(gc, old_group, NULL); if (!strcmp(gpn, gpo)) { g_free(gpn); g_free(gpo); return; } pkt = yahoo_packet_new(YAHOO_SERVICE_GROUPRENAME, YAHOO_STATUS_AVAILABLE, 0); yahoo_packet_hash(pkt, 1, gaim_connection_get_display_name(gc)); yahoo_packet_hash(pkt, 65, gpo); yahoo_packet_hash(pkt, 67, gpn); yahoo_send_packet(yd, pkt); yahoo_packet_free(pkt); g_free(gpn); g_free(gpo); } #if 0 static gboolean yahoo_has_send_file(GaimConnection *gc, const char *who) { return TRUE; } #endif static GaimPlugin *my_protocol = NULL; static GaimPluginProtocolInfo prpl_info = { OPT_PROTO_MAIL_CHECK | OPT_PROTO_CHAT_TOPIC, NULL, /* user_splits */ NULL, /* protocol_options */ yahoo_list_icon, yahoo_list_emblems, yahoo_status_text, yahoo_tooltip_text, yahoo_away_states, yahoo_actions, yahoo_buddy_menu, yahoo_c_info, yahoo_login, yahoo_close, yahoo_send_im, NULL, /* set info */ yahoo_send_typing, yahoo_get_info, yahoo_set_away, NULL, /* get_away */ NULL, /* set_dir */ NULL, /* get_dir */ NULL, /* dir_search */ yahoo_set_idle, NULL, /* change_passwd*/ yahoo_add_buddy, NULL, /* add_buddies */ yahoo_remove_buddy, NULL, /*remove_buddies */ NULL, /* add_permit */ yahoo_add_deny, NULL, /* rem_permit */ yahoo_rem_deny, yahoo_set_permit_deny, NULL, /* warn */ yahoo_c_join, yahoo_c_invite, yahoo_c_leave, NULL, /* chat whisper */ yahoo_c_send, yahoo_keepalive, NULL, /* register_user */ NULL, /* get_cb_info */ NULL, /* get_cb_away */ NULL, /* alias_buddy */ yahoo_change_buddys_group, yahoo_rename_group, NULL, /* buddy_free */ NULL, /* convo_closed */ NULL, /* normalize */ NULL, /* set_buddy_icon */ NULL, /* void (*remove_group)(GaimConnection *gc, const char *group);*/ NULL, /* char *(*get_cb_real_name)(GaimConnection *gc, int id, const char *who); */ #if 0 yahoo_ask_send_file, yahoo_send_file, yahoo_has_send_file, #endif NULL, NULL, yahoo_roomlist_get_list, yahoo_roomlist_cancel, yahoo_roomlist_expand_catagory, }; static GaimPluginInfo info = { 2, /**< api_version */ GAIM_PLUGIN_PROTOCOL, /**< type */ NULL, /**< ui_requirement */ 0, /**< flags */ NULL, /**< dependencies */ GAIM_PRIORITY_DEFAULT, /**< priority */ "prpl-yahoo", /**< id */ "Yahoo", /**< name */ VERSION, /**< version */ /** summary */ N_("Yahoo Protocol Plugin"), /** description */ N_("Yahoo Protocol Plugin"), NULL, /**< author */ GAIM_WEBSITE, /**< homepage */ NULL, /**< load */ yahoo_unload_plugin, /**< unload */ NULL, /**< destroy */ NULL, /**< ui_info */ &prpl_info /**< extra_info */ }; static void init_plugin(GaimPlugin *plugin) { GaimAccountOption *option; option = gaim_account_option_string_new(_("Pager host"), "server", YAHOO_PAGER_HOST); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_int_new(_("Pager port"), "port", YAHOO_PAGER_PORT); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_string_new(_("File transfer host"), "xfer_host", YAHOO_XFER_HOST); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_int_new(_("File transfer port"), "xfer_port", YAHOO_XFER_PORT); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_string_new(_("Chat Room List Url"), "room_list", YAHOO_ROOMLIST_URL); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); my_protocol = plugin; yahoo_init_colorht(); } GAIM_INIT_PLUGIN(yahoo, init_plugin, info);