HGKeeper

* Purple's oscar protocol plugin

* This file is the legal property of its developers.

* Please see the AUTHORS file distributed alongside this file.

* This library is free software; you can redistribute it and/or

* modify it under the terms of the GNU Lesser General Public

* License as published by the Free Software Foundation; either

* version 2 of the License, or (at your option) any later version.

* This library 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

* Lesser General Public License for more details.

* You should have received a copy of the GNU Lesser General Public

* License along with this library; if not, write to the Free Software

* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA

* Family 0x0002 - Locate.

* The functions here are responsible for requesting and parsing information-

* gathering SNACs. Or something like that. This family contains the SNACs

* for getting and setting info, away messages, directory profile thingy, etc.

#include "oscar.h"

#ifdef _WIN32

#include "win32dep.h"

#endif

/* Define to log unknown TLVs */

/* #define LOG_UNKNOWN_TLV */

* Capability blocks.

* These are CLSIDs. They should actually be of the form:

* {0x0946134b, 0x4c7f, 0x11d1,

* {0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}}},

* But, eh.

static const struct {

guint64 flag;

guint8 data[16];

} aim_caps[] = {

* These are in ascending numerical order.

/* Client understands short caps, a UUID of the form

* 0946XXYY-4C7F-11D1-8222-444553540000 where XXYY is the short cap. */

{OSCAR_CAPABILITY_SHORTCAPS,

{0x09, 0x46, 0x00, 0x00, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_SECUREIM,

{0x09, 0x46, 0x00, 0x01, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* OSCAR_CAPABILITY_XHTML_IM */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x00, 0x02, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_VIDEO,

{0x09, 0x46, 0x01, 0x00, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* "Live Video" (SIP/RTC Video) support in Windows AIM 5.5.3501 and newer */

{OSCAR_CAPABILITY_LIVEVIDEO,

{0x09, 0x46, 0x01, 0x01, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* "Camera" support in Windows AIM 5.5.3501 and newer */

{OSCAR_CAPABILITY_CAMERA,

{0x09, 0x46, 0x01, 0x02, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* "Microphone" support in Windows AIM 5.5.3501 and newer */

/* OSCAR_CAPABILITY_MICROPHONE */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x01, 0x03, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* Supports RTC Audio */

/* OSCAR_CAPABILITY_RTCAUDIO */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x01, 0x04, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* In iChatAV (version numbers...?) */

{OSCAR_CAPABILITY_ICHATAV,

{0x09, 0x46, 0x01, 0x05, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x45, 0x53, 0x54, 0x00}},

/* Supports "new status message features" (Who advertises this one?) */

/* OSCAR_CAPABILITY_HOST_STATUS_TEXT_AWARE */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x01, 0x0a, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* Supports "see as I type" (Who advertises this one?) */

/* OSCAR_CAPABILITY_SEE_AS_I_TYPE */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x01, 0x0b, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* Client only asserts caps for services in which it is participating */

/* OSCAR_CAPABILITY_SMARTCAPS */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0x01, 0xff, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_HIPTOP,

{0x09, 0x46, 0x13, 0x23, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_TALK,

{0x09, 0x46, 0x13, 0x41, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_SENDFILE,

{0x09, 0x46, 0x13, 0x43, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_ICQ_DIRECT,

{0x09, 0x46, 0x13, 0x44, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_DIRECTIM,

{0x09, 0x46, 0x13, 0x45, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_BUDDYICON,

{0x09, 0x46, 0x13, 0x46, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_ADDINS,

{0x09, 0x46, 0x13, 0x47, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_GETFILE,

{0x09, 0x46, 0x13, 0x48, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_ICQSERVERRELAY,

{0x09, 0x46, 0x13, 0x49, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

* Indeed, there are two of these. The former appears to be correct,

* but in some versions of winaim, the second one is set. Either they

* forgot to fix endianness, or they made a typo. It really doesn't

* matter which.

{OSCAR_CAPABILITY_GAMES,

{0x09, 0x46, 0x13, 0x4a, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_GAMES2,

{0x09, 0x46, 0x13, 0x4a, 0x4c, 0x7f, 0x11, 0xd1,

0x22, 0x82, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* New format of caps (xtraz icons) */

{OSCAR_CAPABILITY_NEWCAPS,

{0x09, 0x46, 0x00, 0x00, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* Support xtraz statuses */

{OSCAR_CAPABILITY_XTRAZ,

{0x1a, 0x09, 0x3c, 0x6c, 0xd7, 0xFD, 0x4e, 0xc5,

0x9d, 0x51, 0xa6, 0x47, 0x4e, 0x34, 0xf5, 0xa0}},

{OSCAR_CAPABILITY_SENDBUDDYLIST,

{0x09, 0x46, 0x13, 0x4b, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

* Setting this lets AIM users receive messages from ICQ users, and ICQ

* users receive messages from AIM users. It also lets ICQ users show

* up in buddy lists for AIM users, and AIM users show up in buddy lists

* for ICQ users. And ICQ privacy/invisibility acts like AIM privacy,

* in that if you add a user to your deny list, you will not be able to

* see them as online (previous you could still see them, but they

* couldn't see you.

{OSCAR_CAPABILITY_INTEROPERATE,

{0x09, 0x46, 0x13, 0x4d, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_UNICODE,

{0x09, 0x46, 0x13, 0x4e, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0xf0, 0x03, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_ICHAT_SCREENSHARE,

{0x09, 0x46, 0xf0, 0x04, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x09, 0x46, 0xf0, 0x05, 0x4c, 0x7f, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

{OSCAR_CAPABILITY_UNICODEOLD,

{0x2e, 0x7a, 0x64, 0x75, 0xfa, 0xdf, 0x4d, 0xc8,

0x88, 0x6f, 0xea, 0x35, 0x95, 0xfd, 0xb6, 0xdf}},

{OSCAR_CAPABILITY_TYPING,

{0x56, 0x3f, 0xc8, 0x09, 0x0b, 0x6f, 0x41, 0xbd,

0x9f, 0x79, 0x42, 0x26, 0x09, 0xdf, 0xa2, 0xf3}},

* Chat is oddball.

{OSCAR_CAPABILITY_CHAT,

{0x74, 0x8f, 0x24, 0x20, 0x62, 0x87, 0x11, 0xd1,

0x82, 0x22, 0x44, 0x45, 0x53, 0x54, 0x00, 0x00}},

/* This is added by the servers and it only shows up for ourselves... */

{OSCAR_CAPABILITY_GENERICUNKNOWN,

{0x97, 0xb1, 0x27, 0x51, 0x24, 0x3c, 0x43, 0x34,

0xad, 0x22, 0xd6, 0xab, 0xf7, 0x3f, 0x14, 0x09}},

{OSCAR_CAPABILITY_ICQRTF,

{0x97, 0xb1, 0x27, 0x51, 0x24, 0x3c, 0x43, 0x34,

0xad, 0x22, 0xd6, 0xab, 0xf7, 0x3f, 0x14, 0x92}},

{OSCAR_CAPABILITY_APINFO,

{0xaa, 0x4a, 0x32, 0xb5, 0xf8, 0x84, 0x48, 0xc6,

0xa3, 0xd7, 0x8c, 0x50, 0x97, 0x19, 0xfd, 0x5b}},

{OSCAR_CAPABILITY_TRILLIANCRYPT,

{0xf2, 0xe7, 0xc7, 0xf4, 0xfe, 0xad, 0x4d, 0xfb,

0xb2, 0x35, 0x36, 0x79, 0x8b, 0xdf, 0x00, 0x00}},

{OSCAR_CAPABILITY_EMPTY,

{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}},

{OSCAR_CAPABILITY_HTML_MSGS,

{0x01, 0x38, 0xca, 0x7b, 0x76, 0x9a, 0x49, 0x15,

0x88, 0xf2, 0x13, 0xfc, 0x00, 0x97, 0x9e, 0xa8}},

{OSCAR_CAPABILITY_LAST,

{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}},

};

/* Keep this array synchronized with icq_purple_moods. */

static const struct {

const char *mood;

guint8 data[16];

} icq_custom_icons[] = {

{"thinking",

{0x3f, 0xb0, 0xbd, 0x36, 0xaf, 0x3b, 0x4a, 0x60,

0x9e, 0xef, 0xcf, 0x19, 0x0f, 0x6a, 0x5a, 0x7f}},

{"busy",

{0x48, 0x8e, 0x14, 0x89, 0x8a, 0xca, 0x4a, 0x08,

0x82, 0xaa, 0x77, 0xce, 0x7a, 0x16, 0x52, 0x08}},

{"shopping",

{0x63, 0x62, 0x73, 0x37, 0xa0, 0x3f, 0x49, 0xff,

0x80, 0xe5, 0xf7, 0x09, 0xcd, 0xe0, 0xa4, 0xee}},

/* This was in the original patch, but isn't what the official client

* (ICQ 6) sets when you choose its typewriter icon. */

{"typing",

{0x63, 0x4f, 0x6b, 0xd8 ,0xad, 0xd2, 0x4a, 0xa1,

0xaa, 0xb9, 0x11, 0x5b, 0xc2, 0x6d, 0x05, 0xa1}},

{"question",

{0x63, 0x14, 0x36, 0xff, 0x3f, 0x8a, 0x40, 0xd0,

0xa5, 0xcb, 0x7b, 0x66, 0xe0, 0x51, 0xb3, 0x64}},

{"angry",

{0x01, 0xd8, 0xd7, 0xee, 0xac, 0x3b, 0x49, 0x2a,

0xa5, 0x8d, 0xd3, 0xd8, 0x77, 0xe6, 0x6b, 0x92}},

{"plate",

{0xf8, 0xe8, 0xd7, 0xb2, 0x82, 0xc4, 0x41, 0x42,

0x90, 0xf8, 0x10, 0xc6, 0xce, 0x0a, 0x89, 0xa6}},

{"cinema",

{0x10, 0x7a, 0x9a, 0x18, 0x12, 0x32, 0x4d, 0xa4,

0xb6, 0xcd, 0x08, 0x79, 0xdb, 0x78, 0x0f, 0x09}},

{"sick",

{0x1f, 0x7a, 0x40, 0x71, 0xbf, 0x3b, 0x4e, 0x60,

0xbc, 0x32, 0x4c, 0x57, 0x87, 0xb0, 0x4c, 0xf1}},

{"typing",

{0x2c, 0xe0, 0xe4, 0xe5, 0x7c, 0x64, 0x43, 0x70,

0x9c, 0x3a, 0x7a, 0x1c, 0xe8, 0x78, 0xa7, 0xdc}},

{"suit",

{0xb7, 0x08, 0x67, 0xf5, 0x38, 0x25, 0x43, 0x27,

0xa1, 0xff, 0xcf, 0x4c, 0xc1, 0x93, 0x97, 0x97}},

{"bathing",

{0x5a, 0x58, 0x1e, 0xa1, 0xe5, 0x80, 0x43, 0x0c,

0xa0, 0x6f, 0x61, 0x22, 0x98, 0xb7, 0xe4, 0xc7}},

{"tv",

{0x80, 0x53, 0x7d, 0xe2, 0xa4, 0x67, 0x4a, 0x76,

0xb3, 0x54, 0x6d, 0xfd, 0x07, 0x5f, 0x5e, 0xc6}},

{"excited",

{0x6f, 0x49, 0x30, 0x98, 0x4f, 0x7c, 0x4a, 0xff,

0xa2, 0x76, 0x34, 0xa0, 0x3b, 0xce, 0xae, 0xa7}},

{"sleeping",

{0x78, 0x5e, 0x8c, 0x48, 0x40, 0xd3, 0x4c, 0x65,

0x88, 0x6f, 0x04, 0xcf, 0x3f, 0x3f, 0x43, 0xdf}},

{"hiptop",

{0x10, 0x11, 0x17, 0xc9, 0xa3, 0xb0, 0x40, 0xf9,

0x81, 0xac, 0x49, 0xe1, 0x59, 0xfb, 0xd5, 0xd4}},

{"in_love",

{0xdd, 0xcf, 0x0e, 0xa9, 0x71, 0x95, 0x40, 0x48,

0xa9, 0xc6, 0x41, 0x32, 0x06, 0xd6, 0xf2, 0x80}},

{"sleepy",

{0x83, 0xc9, 0xb7, 0x8e, 0x77, 0xe7, 0x43, 0x78,

0xb2, 0xc5, 0xfb, 0x6c, 0xfc, 0xc3, 0x5b, 0xec}},

{"meeting",

{0xf1, 0x8a, 0xb5, 0x2e, 0xdc, 0x57, 0x49, 0x1d,

0x99, 0xdc, 0x64, 0x44, 0x50, 0x24, 0x57, 0xaf}},

{"phone",

{0x12, 0x92, 0xe5, 0x50, 0x1b, 0x64, 0x4f, 0x66,

0xb2, 0x06, 0xb2, 0x9a, 0xf3, 0x78, 0xe4, 0x8d}},

{"surfing",

{0xa6, 0xed, 0x55, 0x7e, 0x6b, 0xf7, 0x44, 0xd4,

0xa5, 0xd4, 0xd2, 0xe7, 0xd9, 0x5c, 0xe8, 0x1f}},

{"mobile",

{0x16, 0x0c, 0x60, 0xbb, 0xdd, 0x44, 0x43, 0xf3,

0x91, 0x40, 0x05, 0x0f, 0x00, 0xe6, 0xc0, 0x09}},

{"search",

{0xd4, 0xe2, 0xb0, 0xba, 0x33, 0x4e, 0x4f, 0xa5,

0x98, 0xd0, 0x11, 0x7d, 0xbf, 0x4d, 0x3c, 0xc8}},

{"party",

{0xe6, 0x01, 0xe4, 0x1c, 0x33, 0x73, 0x4b, 0xd1,

0xbc, 0x06, 0x81, 0x1d, 0x6c, 0x32, 0x3d, 0x81}},

{"coffee",

{0x1b, 0x78, 0xae, 0x31, 0xfa, 0x0b, 0x4d, 0x38,

0x93, 0xd1, 0x99, 0x7e, 0xee, 0xaf, 0xb2, 0x18}},

{"console",

{0xd4, 0xa6, 0x11, 0xd0, 0x8f, 0x01, 0x4e, 0xc0,

0x92, 0x23, 0xc5, 0xb6, 0xbe, 0xc6, 0xcc, 0xf0}},

{"internet",

{0x12, 0xd0, 0x7e, 0x3e, 0xf8, 0x85, 0x48, 0x9e,

0x8e, 0x97, 0xa7, 0x2a, 0x65, 0x51, 0xe5, 0x8d}},

{"cigarette",

{0x64, 0x43, 0xc6, 0xaf, 0x22, 0x60, 0x45, 0x17,

0xb5, 0x8c, 0xd7, 0xdf, 0x8e, 0x29, 0x03, 0x52}},

{"writing",

{0x00, 0x72, 0xd9, 0x08, 0x4a, 0xd1, 0x43, 0xdd,

0x91, 0x99, 0x6f, 0x02, 0x69, 0x66, 0x02, 0x6f}},

{"beer",

{0x8c, 0x50, 0xdb, 0xae, 0x81, 0xed, 0x47, 0x86,

0xac, 0xca, 0x16, 0xcc, 0x32, 0x13, 0xc7, 0xb7}},

{"music",

{0x61, 0xbe, 0xe0, 0xdd, 0x8b, 0xdd, 0x47, 0x5d,

0x8d, 0xee, 0x5f, 0x4b, 0xaa, 0xcf, 0x19, 0xa7}},

{"studying",

{0x60, 0x9d, 0x52, 0xf8, 0xa2, 0x9a, 0x49, 0xa6,

0xb2, 0xa0, 0x25, 0x24, 0xc5, 0xe9, 0xd2, 0x60}},

{"working",

{0xba, 0x74, 0xdb, 0x3e, 0x9e, 0x24, 0x43, 0x4b,

0x87, 0xb6, 0x2f, 0x6b, 0x8d, 0xfe, 0xe5, 0x0f}},

{"restroom",

{0x16, 0xf5, 0xb7, 0x6f, 0xa9, 0xd2, 0x40, 0x35,

0x8c, 0xc5, 0xc0, 0x84, 0x70, 0x3c, 0x98, 0xfa}},

{NULL,

{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}}

};

/* Keep this array synchronized with icq_custom_icons. */

static PurpleMood icq_purple_moods[] = {

{"thinking", N_("Thinking"), NULL},

{"busy", N_("Busy"), NULL},

{"shopping", N_("Shopping"), NULL},

/* This was in the original patch, but isn't what the official client

* (ICQ 6) sets when you choose its typewriter icon. */

{"typing", NULL, NULL},

{"question", N_("Questioning"), NULL},

{"angry", N_("Angry"), NULL},

{"plate", N_("Eating"), NULL},

{"cinema", N_("Watching a movie"), NULL},

{"sick", N_("Sick"), NULL},

{"typing", N_("Typing"), NULL},

{"suit", N_("At the office"), NULL},

{"bathing", N_("Taking a bath"), NULL},

{"tv", N_("Watching TV"), NULL},

{"excited", N_("Having fun"), NULL},

{"sleeping", N_("Sleeping"), NULL},

{"hiptop", N_("Using a PDA"), NULL},

{"in_love", N_("In love"), NULL},

/* Sleepy / Tired */

{"sleepy", N_("Sleepy"), NULL},

{"meeting", N_("Meeting friends"), NULL},

{"phone", N_("On the phone"), NULL},

{"surfing", N_("Surfing"), NULL},

/* "I am mobile." / "John is mobile." */

{"mobile", N_("Mobile"), NULL},

{"search", N_("Searching the web"), NULL},

{"party", N_("At a party"), NULL},

{"coffee", N_("Having Coffee"), NULL},

/* Playing video games */

{"console", N_("Gaming"), NULL},

{"internet", N_("Browsing the web"), NULL},

{"cigarette", N_("Smoking"), NULL},

{"writing", N_("Writing"), NULL},

/* Drinking [Alcohol] */

{"beer", N_("Drinking"), NULL},

{"music", N_("Listening to music"), NULL},

{"studying", N_("Studying"), NULL},

{"working", N_("Working"), NULL},

{"restroom", N_("In the restroom"), NULL},

/* Mark the last record. */

{NULL, NULL, NULL},

};

* Add the userinfo to our linked list. If we already have userinfo

* for this buddy, then just overwrite parts of the old data.

* @param userinfo Contains the new information for the buddy.

static void

aim_locate_adduserinfo(OscarData *od, aim_userinfo_t *userinfo)

{

aim_userinfo_t *cur;

cur = aim_locate_finduserinfo(od, userinfo->bn);

if (cur == NULL) {

cur = (aim_userinfo_t *)g_new0(aim_userinfo_t, 1);

cur->bn = g_strdup(userinfo->bn);

cur->next = od->locate.userinfo;

od->locate.userinfo = cur;

}

cur->warnlevel = userinfo->warnlevel;

cur->idletime = userinfo->idletime;

if (userinfo->flags != 0)

cur->flags = userinfo->flags;

if (userinfo->createtime != 0)

cur->createtime = userinfo->createtime;

if (userinfo->membersince != 0)

cur->membersince = userinfo->membersince;

if (userinfo->onlinesince != 0)

cur->onlinesince = userinfo->onlinesince;

if (userinfo->sessionlen != 0)

cur->sessionlen = userinfo->sessionlen;

if (userinfo->capabilities != 0)

cur->capabilities = userinfo->capabilities;

cur->present |= userinfo->present;

if (userinfo->iconcsumlen > 0) {

g_free(cur->iconcsum);

cur->iconcsum = (guint8 *)g_malloc(userinfo->iconcsumlen);

memcpy(cur->iconcsum, userinfo->iconcsum, userinfo->iconcsumlen);

cur->iconcsumlen = userinfo->iconcsumlen;

}

if (userinfo->info != NULL) {

g_free(cur->info);

g_free(cur->info_encoding);

if (userinfo->info_len > 0) {

cur->info = (char *)g_malloc(userinfo->info_len);

memcpy(cur->info, userinfo->info, userinfo->info_len);

} else

cur->info = NULL;

cur->info_encoding = g_strdup(userinfo->info_encoding);

cur->info_len = userinfo->info_len;

}

if (userinfo->status != NULL) {

g_free(cur->status);

g_free(cur->status_encoding);

if (userinfo->status_len > 0) {

cur->status = (char *)g_malloc(userinfo->status_len);

memcpy(cur->status, userinfo->status, userinfo->status_len);

} else

cur->status = NULL;

if (userinfo->status_encoding != NULL)

cur->status_encoding = g_strdup(userinfo->status_encoding);

else

cur->status_encoding = NULL;

cur->status_len = userinfo->status_len;

}

if (userinfo->itmsurl != NULL) {

g_free(cur->itmsurl);

g_free(cur->itmsurl_encoding);

if (userinfo->itmsurl_len > 0) {

cur->itmsurl = (char *)g_malloc(userinfo->itmsurl_len);

memcpy(cur->itmsurl, userinfo->itmsurl, userinfo->itmsurl_len);

} else

cur->itmsurl = NULL;

if (userinfo->itmsurl_encoding != NULL)

cur->itmsurl_encoding = g_strdup(userinfo->itmsurl_encoding);

else

cur->itmsurl_encoding = NULL;

cur->itmsurl_len = userinfo->itmsurl_len;

}

if (userinfo->away != NULL) {

g_free(cur->away);

g_free(cur->away_encoding);

if (userinfo->away_len > 0) {

cur->away = (char *)g_malloc(userinfo->away_len);

memcpy(cur->away, userinfo->away, userinfo->away_len);

} else

cur->away = NULL;

cur->away_encoding = g_strdup(userinfo->away_encoding);

cur->away_len = userinfo->away_len;

} else {

* We don't have an away message specified in this user_info

* block, so clear any cached away message now.

if (cur->away) {

g_free(cur->away);

cur->away = NULL;

}

if (cur->away_encoding) {

g_free(cur->away_encoding);

cur->away_encoding = NULL;

}

cur->away_len = 0;

}

aim_userinfo_t *aim_locate_finduserinfo(OscarData *od, const char *bn) {

aim_userinfo_t *cur = NULL;

if (bn == NULL)

return NULL;

cur = od->locate.userinfo;

while (cur != NULL) {

if (oscar_util_name_compare(cur->bn, bn) == 0)

return cur;

cur = cur->next;

}

return NULL;

}

guint64

aim_locate_getcaps(OscarData *od, ByteStream *bs, int len)

{

guint64 flags = 0;

int offset;

for (offset = 0; byte_stream_bytes_left(bs) && (offset < len); offset += 0x10) {

guint8 *cap;

int i, identified;

cap = byte_stream_getraw(bs, 0x10);

for (i = 0, identified = 0; !(aim_caps[i].flag & OSCAR_CAPABILITY_LAST); i++) {

if (memcmp(&aim_caps[i].data, cap, 0x10) == 0) {

flags |= aim_caps[i].flag;

identified++;

break; /* should only match once... */

}

if (!identified)

purple_debug_misc("oscar", "unknown capability: {%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x}\n",

cap[0], cap[1], cap[2], cap[3],

cap[4], cap[5],

cap[6], cap[7],

cap[8], cap[9],

cap[10], cap[11], cap[12], cap[13],

cap[14], cap[15]);

g_free(cap);

}

return flags;

}

static const char *

aim_receive_custom_icon(OscarData *od, ByteStream *bs, int len)

{

int offset;

const char *result = NULL;

for (offset = 0; byte_stream_bytes_left(bs) && (offset < len); offset += 0x10) {

/* check wheather this capability is a custom user icon */

guint8 *cap;

int i;

cap = byte_stream_getraw(bs, 0x10);

for (i = 0; icq_custom_icons[i].mood; i++) {

if (memcmp(&icq_custom_icons[i].data, cap, 0x10) == 0) {

purple_debug_misc("oscar", "Custom status icon: %s\n", icq_purple_moods[i].description);

result = icq_custom_icons[i].mood;

break; /* should only match once... */

}

g_free(cap);

}

return result;

}

guint64

aim_locate_getcaps_short(OscarData *od, ByteStream *bs, int len)

{

guint64 flags = 0;

int offset;

for (offset = 0; byte_stream_bytes_left(bs) && (offset < len); offset += 0x02) {

guint8 *cap;

int i, identified;

cap = byte_stream_getraw(bs, 0x02);

for (i = 0, identified = 0; !(aim_caps[i].flag & OSCAR_CAPABILITY_LAST); i++) {

if (memcmp(&aim_caps[i].data[2], cap, 0x02) == 0) {

flags |= aim_caps[i].flag;

identified++;

break; /* should only match once... */

}

if (!identified)

purple_debug_misc("oscar", "unknown short capability: {%02x%02x}\n", cap[0], cap[1]);

g_free(cap);

}

return flags;

}

int

byte_stream_putcaps(ByteStream *bs, guint64 caps)

{

int i;

if (!bs)

return -EINVAL;

for (i = 0; byte_stream_bytes_left(bs); i++) {

if (aim_caps[i].flag == OSCAR_CAPABILITY_LAST)

break;

if (caps & aim_caps[i].flag)

byte_stream_putraw(bs, aim_caps[i].data, 0x10);

}

return 0;

}

#ifdef LOG_UNKNOWN_TLV

static void

dumptlv(OscarData *od, guint16 type, ByteStream *bs, guint8 len)

{

int i;

if (!od || !bs || !len)

return;

purple_debug_misc("oscar", "userinfo: type =0x%04x\n", type);

purple_debug_misc("oscar", "userinfo: length=0x%04x\n", len);

purple_debug_misc("oscar", "userinfo: value:\n");

for (i = 0; i < len; i++) {

if ((i % 8) == 0)

purple_debug_misc("oscar", "\nuserinfo: ");

purple_debug_misc("oscar", "0x%2x ", byte_stream_get8(bs));

}

purple_debug_misc("oscar", "\n");

return;

}

#endif

void

aim_info_free(aim_userinfo_t *info)

{

g_free(info->bn);

g_free(info->iconcsum);

g_free(info->info);

g_free(info->info_encoding);

g_free(info->status);

g_free(info->status_encoding);

g_free(info->itmsurl);

g_free(info->itmsurl_encoding);

g_free(info->away);

g_free(info->away_encoding);

}

static const struct {

char *icqmood;

const char *mood;

} icqmoods[] = {

{"icqmood0", "shopping"},

{"icqmood1", "bathing"},

{"icqmood2", "sleepy"},

{"icqmood3", "party"},

{"icqmood4", "beer"},

{"icqmood5", "thinking"},

{"icqmood6", "plate"},

{"icqmood7", "tv"},

{"icqmood8", "meeting"},

{"icqmood9", "coffee"},

{"icqmood10", "music"},

{"icqmood11", "suit"},

{"icqmood12", "cinema"},

{"icqmood13", "smile-big"},

{"icqmood14", "phone"},

{"icqmood15", "console"},

{"icqmood16", "studying"},

{"icqmood17", "sick"},

{"icqmood18", "sleeping"},

{"icqmood19", "surfing"},

{"icqmood20", "internet"},

{"icqmood21", "working"},

{"icqmood22", "typing"},

{"icqmood23", "angry"},

{NULL, 0}

};

* AIM is fairly regular about providing user info. This is a generic

* routine to extract it in its standard form.

int

aim_info_extract(OscarData *od, ByteStream *bs, aim_userinfo_t *outinfo)

{

int curtlv, tlvcnt;

guint8 bnlen;

if (!bs || !outinfo)

return -EINVAL;

/* Clear out old data first */

memset(outinfo, 0x00, sizeof(aim_userinfo_t));

* Username. Stored as an unterminated string prepended with a

* byte containing its length.

bnlen = byte_stream_get8(bs);

outinfo->bn = byte_stream_getstr(bs, bnlen);

* Warning Level. Stored as an unsigned short.

outinfo->warnlevel = byte_stream_get16(bs);

* TLV Count. Unsigned short representing the number of

* Type-Length-Value triples that follow.

tlvcnt = byte_stream_get16(bs);

* Parse out the Type-Length-Value triples as they're found.

for (curtlv = 0; curtlv < tlvcnt; curtlv++) {

guint16 type, length;

int endpos;

int curpos;

type = byte_stream_get16(bs);

length = byte_stream_get16(bs);

curpos = byte_stream_curpos(bs);

endpos = curpos + MIN(length, byte_stream_bytes_left(bs));

if (type == 0x0001) {

* User flags

* Specified as any of the following ORed together:

* 0x0001 Unconfirmed account

* 0x0002 Unknown bit 2

* 0x0004 AOL Main Service user

* 0x0008 Unknown bit 4

* 0x0010 Free (AIM) user

* 0x0020 Away

* 0x0040 ICQ user (AIM bit also set)

* 0x0080 Mobile device

* 0x0400 Bot (like ActiveBuddy)

outinfo->flags = byte_stream_get16(bs);

outinfo->present |= AIM_USERINFO_PRESENT_FLAGS;

} else if (type == 0x0002) {

* Account creation time

* The time/date that the user originally registered for

* the service, stored in time_t format.

* I'm not sure how this differs from type 5 ("member

* since").

* Note: This is the field formerly known as "member

* since". All these years and I finally found out

* that I got the name wrong.

outinfo->createtime = byte_stream_get32(bs);

outinfo->present |= AIM_USERINFO_PRESENT_CREATETIME;

} else if (type == 0x0003) {

* On-Since date

* The time/date that the user started their current

* session, stored in time_t format.

outinfo->onlinesince = byte_stream_get32(bs);

outinfo->present |= AIM_USERINFO_PRESENT_ONLINESINCE;

} else if (type == 0x0004) {

* Idle time

* Number of minutes since the user actively used the

* service.

* Note that the client tells the server when to start

* counting idle times, so this may or may not be

* related to reality.

outinfo->idletime = byte_stream_get16(bs);

outinfo->present |= AIM_USERINFO_PRESENT_IDLE;

} else if (type == 0x0005) {

* Member since date

* The time/date that the user originally registered for

* the service, stored in time_t format.

* This is sometimes sent instead of type 2 ("account

* creation time"), particularly in the self-info.

* And particularly for ICQ?

outinfo->membersince = byte_stream_get32(bs);

outinfo->present |= AIM_USERINFO_PRESENT_MEMBERSINCE;

} else if (type == 0x0006) {

* ICQ Online Status

* ICQ's Away/DND/etc "enriched" status. Some decoding

* of values done by Scott <darkagl@pcnet.com>

byte_stream_get16(bs);

outinfo->icqinfo.status = byte_stream_get16(bs);

outinfo->present |= AIM_USERINFO_PRESENT_ICQEXTSTATUS;

} else if (type == 0x0008) {

* Client type, or some such.

} else if (type == 0x000a) {

* ICQ User IP Address

* Ahh, the joy of ICQ security.

outinfo->icqinfo.ipaddr = byte_stream_get32(bs);

outinfo->present |= AIM_USERINFO_PRESENT_ICQIPADDR;

} else if (type == 0x000c) {

* Random crap containing the IP address,

* apparently a port number, and some Other Stuff.

* Format is:

* 4 bytes - Our IP address, 0xc0 a8 01 2b for 192.168.1.43

byte_stream_getrawbuf(bs, outinfo->icqinfo.crap, 0x25);

outinfo->present |= AIM_USERINFO_PRESENT_ICQDATA;

} else if (type == 0x000d) {

PurpleAccount *account = purple_connection_get_account(od->gc);

const char *mood;

* OSCAR Capability information

outinfo->capabilities |= aim_locate_getcaps(od, bs, length);

outinfo->present |= AIM_USERINFO_PRESENT_CAPABILITIES;

byte_stream_setpos(bs, curpos);

mood = aim_receive_custom_icon(od, bs, length);

if (mood)

purple_prpl_got_user_status(account, outinfo->bn, "mood",

PURPLE_MOOD_NAME, mood,

NULL);

else

purple_prpl_got_user_status_deactive(account, outinfo->bn, "mood");

} else if (type == 0x000e) {

* AOL capability information

} else if ((type == 0x000f) || (type == 0x0010)) {

* Type = 0x000f: Session Length. (AIM)

* Type = 0x0010: Session Length. (AOL)

* The duration, in seconds, of the user's current

* session.

* Which TLV type this comes in depends on the

* service the user is using (AIM or AOL).

outinfo->sessionlen = byte_stream_get32(bs);

outinfo->present |= AIM_USERINFO_PRESENT_SESSIONLEN;

} else if (type == 0x0014) {

* My instance number.

byte_stream_get8(bs);

} else if (type == 0x0019) {

* OSCAR short capability information. A shortened

* form of the normal capabilities.

outinfo->capabilities |= aim_locate_getcaps_short(od, bs, length);

outinfo->present |= AIM_USERINFO_PRESENT_CAPABILITIES;

} else if (type == 0x001a) {

* Type = 0x001a

* AOL short capability information. A shortened

* form of the normal capabilities.

} else if (type == 0x001b) {

* Encryption certification MD5 checksum.

} else if (type == 0x001d) {

* Buddy icon information and status/available messages.

* This almost seems like the AIM protocol guys gave

* the iChat guys a Type, and the iChat guys tried to

* cram as much cool shit into it as possible. Then

* the Windows AIM guys were like, "hey, that's

* pretty neat, let's copy those prawns."

* In that spirit, this can contain a custom message,

* kind of like an away message, but you're not away

* (it's called an "available" message). Or it can

* contain information about the buddy icon the user

* has stored on the server.

guint16 type2;

guint8 number2, length2;

int endpos2;

* Continue looping as long as we're able to read type2,

* number2, and length2.

while (byte_stream_curpos(bs) + 4 <= endpos) {

type2 = byte_stream_get16(bs);

number2 = byte_stream_get8(bs);

length2 = byte_stream_get8(bs);

endpos2 = byte_stream_curpos(bs) + MIN(length2, byte_stream_bytes_left(bs));

switch (type2) {

case 0x0000: { /* This is an official buddy icon? */

/* This is always 5 bytes of "0x02 01 d2 04 72"? */

} break;

case 0x0001: { /* A buddy icon checksum */

if ((length2 > 0) && ((number2 == 0x00) || (number2 == 0x01))) {

g_free(outinfo->iconcsum);

outinfo->iconcsumtype = number2;

outinfo->iconcsum = byte_stream_getraw(bs, length2);

outinfo->iconcsumlen = length2;

}

} break;

case 0x0002: { /* A status/available message */

g_free(outinfo->status);

g_free(outinfo->status_encoding);

if (length2 >= 4) {

outinfo->status_len = byte_stream_get16(bs);

outinfo->status = byte_stream_getstr(bs, outinfo->status_len);

if (byte_stream_get16(bs) == 0x0001) { /* We have an encoding */

byte_stream_get16(bs);

outinfo->status_encoding = byte_stream_getstr(bs, byte_stream_get16(bs));

} else {

/* No explicit encoding, client should use UTF-8 */

outinfo->status_encoding = NULL;

}

} else {

byte_stream_advance(bs, length2);

outinfo->status_len = 0;

outinfo->status = g_strdup("");

outinfo->status_encoding = NULL;

}

} break;

case 0x0009: { /* An iTunes Music Store link */

g_free(outinfo->itmsurl);

g_free(outinfo->itmsurl_encoding);

if (length2 >= 4) {

outinfo->itmsurl_len = byte_stream_get16(bs);

outinfo->itmsurl = byte_stream_getstr(bs, outinfo->itmsurl_len);

if (byte_stream_get16(bs) == 0x0001) {

/* We have an encoding */

byte_stream_get16(bs);

outinfo->itmsurl_encoding = byte_stream_getstr(bs, byte_stream_get16(bs));

} else {

/* No explicit encoding, client should use UTF-8 */

outinfo->itmsurl_encoding = NULL;

}

} else {

byte_stream_advance(bs, length2);

outinfo->itmsurl_len = 0;

outinfo->itmsurl = g_strdup("");

outinfo->itmsurl_encoding = NULL;

}

} break;

case 0x000e: { /* ICQ mood */

PurpleAccount *account = purple_connection_get_account(od->gc);

char *icqmood;

gint32 i;

const char *mood = NULL;

icqmood = byte_stream_getstr(bs, length2);

/* icqmood = "" means X-Status

* with no mood icon. */

if (*icqmood) {

for (i = 0; icqmoods[i].icqmood; i++) {

if (purple_strequal(icqmood, icqmoods[i].icqmood)) {

mood = icqmoods[i].mood;

break; /* should only match once... */

}

if (!mood)

purple_debug_warning("oscar", "Unknown icqmood: %s\n", icqmood);

}

g_free(icqmood);

if (mood)

purple_prpl_got_user_status(account, outinfo->bn, "mood",

PURPLE_MOOD_NAME, mood,

NULL);

else

purple_prpl_got_user_status_deactive(account, outinfo->bn, "mood");

} break;

}

/* Save ourselves. */

byte_stream_setpos(bs, endpos2);

}

} else if (type == 0x001e) {

* Always four bytes, but it doesn't look like an int.

} else if (type == 0x001f) {

* Upper bytes of user flags. Can be any size

* Seen on a buddy using DeadAIM. Data was 4 bytes:

* 0x00 00 00 10

} else if (type == 0x0023) {

* Last Buddy Feed update time, in seconds since the epoch.

} else if (type == 0x0026) {

* Time that the profile was set, in seconds since the epoch.

} else if (type == 0x0027) {

* Time that the away message was set, in seconds since the epoch.

} else if (type == 0x002a) {

* Country code based on GeoIP data.

} else {

* Reaching here indicates that either AOL has

* added yet another TLV for us to deal with,

* or the parsing has gone Terribly Wrong.

* Either way, inform the owner and attempt

* recovery.

#ifdef LOG_UNKNOWN_TLV

purple_debug_misc("oscar", "userinfo: **warning: unexpected TLV:\n");

purple_debug_misc("oscar", "userinfo: bn =%s\n", outinfo->bn);

dumptlv(od, type, bs, length);

#endif

}

/* Save ourselves. */

byte_stream_setpos(bs, endpos);

}

aim_locate_adduserinfo(od, outinfo);

return 0;

}

* Subtype 0x0001

static int

error(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)

{

aim_snac_t *snac2;

guint16 reason;

char *bn;

snac2 = aim_remsnac(od, snac->id);

if (!snac2) {

purple_debug_misc("oscar", "locate error: received response from unknown request!\n");

return 0;

}

if ((snac2->family != SNAC_FAMILY_LOCATE) && (snac2->type != 0x0015)) {

purple_debug_misc("oscar", "locate error: received response from invalid request! %d\n", snac2->family);

g_free(snac2->data);

g_free(snac2);

return 0;

}

bn = snac2->data;

if (!bn) {

purple_debug_misc("oscar", "locate error: received response from request without a buddy name!\n");

g_free(snac2);

return 0;

}

reason = byte_stream_get16(bs);

oscar_user_info_display_error(od, reason, bn);

g_free(snac2->data);

g_free(snac2);

return 1;

}

* Subtype 0x0002

* Request Location services rights.

int

aim_locate_reqrights(OscarData *od)

{

FlapConnection *conn;

if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_LOCATE)))

return -EINVAL;

aim_genericreq_n_snacid(od, conn, SNAC_FAMILY_LOCATE, SNAC_SUBTYPE_LOCATE_REQRIGHTS);

return 0;

}

* Subtype 0x0003

* Normally contains:

* t(0001) - short containing max profile length (value = 1024)

* t(0002) - short - unknown (value = 16) [max MIME type length?]

* t(0003) - short - unknown (value = 10)

* t(0004) - short - unknown (value = 2048) [ICQ only?]

static int

rights(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)

{

GSList *tlvlist;

aim_rxcallback_t userfunc;

int ret = 0;

guint16 maxsiglen = 0;

tlvlist = aim_tlvlist_read(bs);

if (aim_tlv_gettlv(tlvlist, 0x0001, 1))

maxsiglen = aim_tlv_get16(tlvlist, 0x0001, 1);

if ((userfunc = aim_callhandler(od, snac->family, snac->subtype)))

ret = userfunc(od, conn, frame, maxsiglen);

aim_tlvlist_free(tlvlist);

return ret;

}

* Subtype 0x0004

* Gives BOS your profile.

* profile_encoding and awaymsg_encoding MUST be set if profile or

* away are set, respectively, and their value may or may not be

* restricted to a few choices. I am currently aware of:

* us-ascii Just that

* unicode-2-0 UTF-16BE

* profile_len and awaymsg_len MUST be set similarly, and they MUST

* be the length of their respective strings in bytes.

* To get the previous behavior of awaymsg == "" un-setting the away

* message, set awaymsg non-NULL and awaymsg_len to 0 (this is the

* obvious equivalent).

int

aim_locate_setprofile(OscarData *od,

const char *profile_encoding, const gchar *profile, const int profile_len,

const char *awaymsg_encoding, const gchar *awaymsg, const int awaymsg_len)

{

FlapConnection *conn;

ByteStream bs;

aim_snacid_t snacid;

GSList *tlvlist = NULL;

char *encoding;

static const char defencoding[] = {"text/aolrtf; charset=\"%s\""};

if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_LOCATE)))

return -EINVAL;

if (!profile && !awaymsg)

return -EINVAL;

if ((profile && profile_encoding == NULL) || (awaymsg && awaymsg_len && awaymsg_encoding == NULL)) {

return -EINVAL;

}

/* Build the packet first to get real length */

if (profile) {

/* no + 1 here because of %s */

encoding = g_malloc(strlen(defencoding) + strlen(profile_encoding));

snprintf(encoding, strlen(defencoding) + strlen(profile_encoding), defencoding, profile_encoding);

aim_tlvlist_add_str(&tlvlist, 0x0001, encoding);

aim_tlvlist_add_raw(&tlvlist, 0x0002, profile_len, (const guchar *)profile);

g_free(encoding);

}

* So here's how this works:

* - You are away when you have a non-zero-length type 4 TLV stored.

* - You become unaway when you clear the TLV with a zero-length

* type 4 TLV.

* - If you do not send the type 4 TLV, your status does not change

* (that is, if you were away, you'll remain away).

if (awaymsg) {

if (awaymsg_len) {

encoding = g_malloc(strlen(defencoding) + strlen(awaymsg_encoding));

snprintf(encoding, strlen(defencoding) + strlen(awaymsg_encoding), defencoding, awaymsg_encoding);

aim_tlvlist_add_str(&tlvlist, 0x0003, encoding);

aim_tlvlist_add_raw(&tlvlist, 0x0004, awaymsg_len, (const guchar *)awaymsg);

g_free(encoding);

} else

aim_tlvlist_add_noval(&tlvlist, 0x0004);

}

byte_stream_new(&bs, aim_tlvlist_size(tlvlist));

snacid = aim_cachesnac(od, SNAC_FAMILY_LOCATE, 0x0004, 0x0000, NULL, 0);

aim_tlvlist_write(&bs, &tlvlist);

aim_tlvlist_free(tlvlist);

flap_connection_send_snac(od, conn, SNAC_FAMILY_LOCATE, 0x0004, snacid, &bs);

byte_stream_destroy(&bs);

return 0;

}

* Subtype 0x0004 - Set your client's capabilities.

int

aim_locate_setcaps(OscarData *od, guint64 caps)

{

FlapConnection *conn;

PurpleAccount *account = purple_connection_get_account(od->gc);

PurplePresence *presence = purple_account_get_presence(account);

PurpleStatus *status = purple_presence_get_status(presence, "mood");

const char *mood = purple_status_get_attr_string(status, PURPLE_MOOD_NAME);

ByteStream bs;

aim_snacid_t snacid;

GSList *tlvlist = NULL;

if (!(conn = flap_connection_findbygroup(od, SNAC_FAMILY_LOCATE)))

return -EINVAL;

aim_tlvlist_add_caps(&tlvlist, 0x0005, caps, mood);

byte_stream_new(&bs, aim_tlvlist_size(tlvlist));

snacid = aim_cachesnac(od, SNAC_FAMILY_LOCATE, 0x0004, 0x0000, NULL, 0);

aim_tlvlist_write(&bs, &tlvlist);

aim_tlvlist_free(tlvlist);

flap_connection_send_snac(od, conn, SNAC_FAMILY_LOCATE, 0x0004, snacid, &bs);

byte_stream_destroy(&bs);

return 0;

}

/* Subtype 0x0006 */

static int

userinfo(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)

{

int ret = 0;

aim_userinfo_t *userinfo, *userinfo2;

GSList *tlvlist;

aim_tlv_t *tlv = NULL;

userinfo = (aim_userinfo_t *)g_malloc(sizeof(aim_userinfo_t));

aim_info_extract(od, bs, userinfo);

tlvlist = aim_tlvlist_read(bs);

/* Profile will be 1 and 2 */

userinfo->info_encoding = aim_tlv_getstr(tlvlist, 0x0001, 1);

if ((tlv = aim_tlv_gettlv(tlvlist, 0x0002, 1))) {

userinfo->info = (char *)g_malloc(tlv->length);

memcpy(userinfo->info, tlv->value, tlv->length);

userinfo->info_len = tlv->length;

}

/* Away message will be 3 and 4 */

userinfo->away_encoding = aim_tlv_getstr(tlvlist, 0x0003, 1);

if ((tlv = aim_tlv_gettlv(tlvlist, 0x0004, 1))) {

userinfo->away = (char *)g_malloc(tlv->length);

memcpy(userinfo->away, tlv->value, tlv->length);

userinfo->away_len = tlv->length;

}

/* Caps will be 5 */

if ((tlv = aim_tlv_gettlv(tlvlist, 0x0005, 1))) {

ByteStream cbs;

PurpleAccount *account = purple_connection_get_account(od->gc);

const char *mood;

byte_stream_init(&cbs, tlv->value, tlv->length);

userinfo->capabilities = aim_locate_getcaps(od, &cbs, tlv->length);

byte_stream_rewind(&cbs);

userinfo->present = AIM_USERINFO_PRESENT_CAPABILITIES;

mood = aim_receive_custom_icon(od, &cbs, tlv->length);

if (mood)

purple_prpl_got_user_status(account, userinfo->bn, "mood",

PURPLE_MOOD_NAME, mood,

NULL);

else

purple_prpl_got_user_status_deactive(account, userinfo->bn, "mood");

}

aim_tlvlist_free(tlvlist);

aim_locate_adduserinfo(od, userinfo);

userinfo2 = aim_locate_finduserinfo(od, userinfo->bn);

aim_info_free(userinfo);

g_free(userinfo);

/* Show the info to the user */

oscar_user_info_display_aim(od, userinfo2);

return ret;

}

* Subtype 0x0015 - Request the info of a user using the short method. This is

* what iChat uses. It normally is VERY leniently rate limited.

* @param bn The buddy name whose info you wish to request.

* @param flags The bitmask which specifies the type of info you wish to request.

* 0x00000001 - Info/profile.

* 0x00000002 - Away message.

* 0x00000004 - Capabilities.

* 0x00000008 - Certification.

* @return Return 0 if no errors, otherwise return the error number.

int

aim_locate_getinfoshort(OscarData *od, const char *bn, guint32 flags)

{

FlapConnection *conn;

ByteStream bs;

aim_snacid_t snacid;

if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_LOCATE)) || !bn)

return -EINVAL;

byte_stream_new(&bs, 4 + 1 + strlen(bn));

byte_stream_put32(&bs, flags);

byte_stream_put8(&bs, strlen(bn));

byte_stream_putstr(&bs, bn);

snacid = aim_cachesnac(od, SNAC_FAMILY_LOCATE, 0x0015, 0x0000, bn, strlen(bn)+1);

flap_connection_send_snac_with_priority(od, conn, SNAC_FAMILY_LOCATE, 0x0015, snacid, &bs, FALSE);

byte_stream_destroy(&bs);

return 0;

}

static int

snachandler(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)

{

if (snac->subtype == 0x0001)

return error(od, conn, mod, frame, snac, bs);

else if (snac->subtype == 0x0003)

return rights(od, conn, mod, frame, snac, bs);

else if (snac->subtype == 0x0006)

return userinfo(od, conn, mod, frame, snac, bs);

return 0;

}

static void

locate_shutdown(OscarData *od, aim_module_t *mod)

{

aim_userinfo_t *del;

while (od->locate.userinfo) {

del = od->locate.userinfo;

od->locate.userinfo = od->locate.userinfo->next;

aim_info_free(del);

g_free(del);

}

int

locate_modfirst(OscarData *od, aim_module_t *mod)

{

mod->family = SNAC_FAMILY_LOCATE;

mod->version = 0x0001;

mod->toolid = 0x0110;

mod->toolversion = 0x0629;

mod->flags = 0;

strncpy(mod->name, "locate", sizeof(mod->name));

mod->snachandler = snachandler;

mod->shutdown = locate_shutdown;

return 0;

}

const char*

icq_get_custom_icon_description(const char *mood)

{

int i;

if (!(mood && *mood))

return NULL;

for (i = 0; icq_custom_icons[i].mood; i++) {

/* We check that description is not NULL to exclude

* duplicates, like the typing duplicate. */

if (icq_purple_moods[i].description &&

purple_strequal(mood, icq_custom_icons[i].mood)) {

return icq_purple_moods[i].description;

}

return NULL;

}

guint8*

icq_get_custom_icon_data(const char *mood)

{

int i;

if (!(mood && *mood))

return NULL;

for (i = 0; icq_custom_icons[i].mood; i++) {

/* We check that description is not NULL to exclude

* duplicates, like the typing duplicate. */

if (icq_purple_moods[i].description &&

purple_strequal(mood, icq_custom_icons[i].mood)) {

return (guint8 *)icq_custom_icons[i].data;

}

return NULL;

}

PurpleMood*

icq_get_purple_moods(PurpleAccount *account)

{

return icq_purple_moods;

}

pidgin/pidgin