static int parseinfo_create(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs, aim_snac_t *snac2)
{
aim_rxcallback_t userfunc;
aim_tlvlist_t *tlvlist, *innerlist;
char *ck = NULL, *fqcn = NULL, *name = NULL;
fu16_t exchange = 0, instance = 0, unknown = 0, flags = 0, maxmsglen = 0, maxoccupancy = 0;
fu32_t createtime = 0;
fu8_t createperms = 0, detaillevel;
int cklen;
aim_tlv_t *bigblock;
int ret = 0;
aim_bstream_t bbbs;
tlvlist = aim_readtlvchain(bs);
if (!(bigblock = aim_gettlv(tlvlist, 0x0004, 1))) {
faimdprintf(sess, 0, "no bigblock in top tlv in create room response\n");
aim_freetlvchain(&tlvlist);
return 0;
}
aim_bstream_init(&bbbs, bigblock->value, bigblock->length);
exchange = aimbs_get16(&bbbs);
cklen = aimbs_get8(&bbbs);
ck = aimbs_getstr(&bbbs, cklen);
instance = aimbs_get16(&bbbs);
detaillevel = aimbs_get8(&bbbs);
if (detaillevel != 0x02) {
faimdprintf(sess, 0, "unknown detaillevel in create room response (0x%02x)\n", detaillevel);
aim_freetlvchain(&tlvlist);
free(ck);
return 0;
}
unknown = aimbs_get16(&bbbs);
innerlist = aim_readtlvchain(&bbbs);
if (aim_gettlv(innerlist, 0x006a, 1))
fqcn = aim_gettlv_str(innerlist, 0x006a, 1);
if (aim_gettlv(innerlist, 0x00c9, 1))
flags = aim_gettlv16(innerlist, 0x00c9, 1);
if (aim_gettlv(innerlist, 0x00ca, 1))
createtime = aim_gettlv32(innerlist, 0x00ca, 1);
if (aim_gettlv(innerlist, 0x00d1, 1))
maxmsglen = aim_gettlv16(innerlist, 0x00d1, 1);
if (aim_gettlv(innerlist, 0x00d2, 1))
maxoccupancy = aim_gettlv16(innerlist, 0x00d2, 1);
if (aim_gettlv(innerlist, 0x00d3, 1))
name = aim_gettlv_str(innerlist, 0x00d3, 1);
if (aim_gettlv(innerlist, 0x00d5, 1))
createperms = aim_gettlv8(innerlist, 0x00d5, 1);
if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype))) {
ret = userfunc(sess, rx, snac2->type, fqcn, instance, exchange, flags, createtime, maxmsglen, maxoccupancy, createperms, unknown, name, ck);
}
free(ck);
free(name);
free(fqcn);
aim_freetlvchain(&innerlist);
aim_freetlvchain(&tlvlist);
return ret;
}
/*
* This is sent back as a general response to the login command.
* It can be either an error or a success, depending on the
* precense of certain TLVs.
*
* The client should check the value passed as errorcode. If
* its nonzero, there was an error.
*
*/
static int parse(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
{
aim_tlvlist_t *tlvlist;
aim_rxcallback_t userfunc;
struct aim_authresp_info info;
int ret = 0;
memset(&info, 0, sizeof(info));
/*
* Read block of TLVs. All further data is derived
* from what is parsed here.
*/
tlvlist = aim_readtlvchain(bs);
/*
* No matter what, we should have a screen name.
*/
memset(sess->sn, 0, sizeof(sess->sn));
if (aim_gettlv(tlvlist, 0x0001, 1)) {
info.sn = aim_gettlv_str(tlvlist, 0x0001, 1);
strncpy(sess->sn, info.sn, sizeof(sess->sn));
}
/*
* Check for an error code. If so, we should also
* have an error url.
*/
if (aim_gettlv(tlvlist, 0x0008, 1)) {
info.errorcode = aim_gettlv16(tlvlist, 0x0008, 1);
}
if (aim_gettlv(tlvlist, 0x0004, 1)) {
info.errorurl = aim_gettlv_str(tlvlist, 0x0004, 1);
}
/*
* BOS server address.
*/
if (aim_gettlv(tlvlist, 0x0005, 1)) {
info.bosip = aim_gettlv_str(tlvlist, 0x0005, 1);
}
/*
* Authorization cookie.
*/
if (aim_gettlv(tlvlist, 0x0006, 1)) {
aim_tlv_t *tmptlv;
tmptlv = aim_gettlv(tlvlist, 0x0006, 1);
info.cookie = tmptlv->value;
}
/*
* The email address attached to this account
* Not available for ICQ logins.
*/
if (aim_gettlv(tlvlist, 0x0011, 1)) {
info.email = aim_gettlv_str(tlvlist, 0x0011, 1);
}
/*
* The registration status. (Not real sure what it means.)
* Not available for ICQ logins.
*
* 1 = No disclosure
* 2 = Limited disclosure
* 3 = Full disclosure
*
* This has to do with whether your email address is available
* to other users or not. AFAIK, this feature is no longer used.
*
*/
if (aim_gettlv(tlvlist, 0x0013, 1)) {
info.regstatus = aim_gettlv16(tlvlist, 0x0013, 1);
}
if (aim_gettlv(tlvlist, 0x0040, 1)) {
info.latestbeta.build = aim_gettlv32(tlvlist, 0x0040, 1);
}
if (aim_gettlv(tlvlist, 0x0041, 1)) {
info.latestbeta.url = aim_gettlv_str(tlvlist, 0x0041, 1);
}
if (aim_gettlv(tlvlist, 0x0042, 1)) {
info.latestbeta.info = aim_gettlv_str(tlvlist, 0x0042, 1);
}
if (aim_gettlv(tlvlist, 0x0043, 1)) {
info.latestbeta.name = aim_gettlv_str(tlvlist, 0x0043, 1);
}
if (aim_gettlv(tlvlist, 0x0048, 1)) {
; /* no idea what this is */
}
if (aim_gettlv(tlvlist, 0x0044, 1)) {
info.latestrelease.build = aim_gettlv32(tlvlist, 0x0044, 1);
}
if (aim_gettlv(tlvlist, 0x0045, 1)) {
info.latestrelease.url = aim_gettlv_str(tlvlist, 0x0045, 1);
}
if (aim_gettlv(tlvlist, 0x0046, 1)) {
info.latestrelease.info = aim_gettlv_str(tlvlist, 0x0046, 1);
}
if (aim_gettlv(tlvlist, 0x0047, 1)) {
info.latestrelease.name = aim_gettlv_str(tlvlist, 0x0047, 1);
}
if (aim_gettlv(tlvlist, 0x0049, 1)) {
; /* no idea what this is */
}
if ((userfunc = aim_callhandler(sess, rx->conn, snac ? snac->family : 0x0017, snac ? snac->subtype : 0x0003))) {
ret = userfunc(sess, rx, &info);
}
g_free(info.sn);
g_free(info.bosip);
g_free(info.errorurl);
g_free(info.email);
g_free(info.latestrelease.name);
g_free(info.latestrelease.url);
g_free(info.latestrelease.info);
g_free(info.latestbeta.name);
g_free(info.latestbeta.url);
g_free(info.latestbeta.info);
aim_freetlvchain(&tlvlist);
return ret;
}
/*
* General room information. Lots of stuff.
*
* Values I know are in here but I havent attached
* them to any of the 'Unknown's:
* - Language (English)
*
* SNAC 000e/0002
*/
static int infoupdate(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
{
aim_userinfo_t *userinfo = NULL;
aim_rxcallback_t userfunc;
int ret = 0;
int usercount = 0;
fu8_t detaillevel = 0;
char *roomname = NULL;
struct aim_chat_roominfo roominfo;
fu16_t tlvcount = 0;
aim_tlvlist_t *tlvlist;
char *roomdesc = NULL;
fu16_t flags = 0;
fu32_t creationtime = 0;
fu16_t maxmsglen = 0, maxvisiblemsglen = 0;
fu16_t unknown_d2 = 0, unknown_d5 = 0;
aim_chat_readroominfo(bs, &roominfo);
detaillevel = aimbs_get8(bs);
if (detaillevel != 0x02) {
faimdprintf(sess, 0, "faim: chat_roomupdateinfo: detail level %d not supported\n", detaillevel);
return 1;
}
tlvcount = aimbs_get16(bs);
/*
* Everything else are TLVs.
*/
tlvlist = aim_readtlvchain(bs);
/*
* TLV type 0x006a is the room name in Human Readable Form.
*/
if (aim_gettlv(tlvlist, 0x006a, 1))
roomname = aim_gettlv_str(tlvlist, 0x006a, 1);
/*
* Type 0x006f: Number of occupants.
*/
if (aim_gettlv(tlvlist, 0x006f, 1))
usercount = aim_gettlv16(tlvlist, 0x006f, 1);
/*
* Type 0x0073: Occupant list.
*/
if (aim_gettlv(tlvlist, 0x0073, 1)) {
int curoccupant = 0;
aim_tlv_t *tmptlv;
aim_bstream_t occbs;
tmptlv = aim_gettlv(tlvlist, 0x0073, 1);
/* Allocate enough userinfo structs for all occupants */
userinfo = calloc(usercount, sizeof(aim_userinfo_t));
aim_bstream_init(&occbs, tmptlv->value, tmptlv->length);
while (curoccupant < usercount)
aim_extractuserinfo(sess, &occbs, &userinfo[curoccupant++]);
}
/*
* Type 0x00c9: Flags. (AIM_CHATROOM_FLAG)
*/
if (aim_gettlv(tlvlist, 0x00c9, 1))
flags = aim_gettlv16(tlvlist, 0x00c9, 1);
/*
* Type 0x00ca: Creation time (4 bytes)
*/
if (aim_gettlv(tlvlist, 0x00ca, 1))
creationtime = aim_gettlv32(tlvlist, 0x00ca, 1);
/*
* Type 0x00d1: Maximum Message Length
*/
if (aim_gettlv(tlvlist, 0x00d1, 1))
maxmsglen = aim_gettlv16(tlvlist, 0x00d1, 1);
/*
* Type 0x00d2: Unknown. (2 bytes)
*/
if (aim_gettlv(tlvlist, 0x00d2, 1))
unknown_d2 = aim_gettlv16(tlvlist, 0x00d2, 1);
/*
* Type 0x00d3: Room Description
*/
if (aim_gettlv(tlvlist, 0x00d3, 1))
roomdesc = aim_gettlv_str(tlvlist, 0x00d3, 1);
/*
* Type 0x000d4: Unknown (flag only)
*/
if (aim_gettlv(tlvlist, 0x000d4, 1))
;
/*
* Type 0x00d5: Unknown. (1 byte)
*/
if (aim_gettlv(tlvlist, 0x00d5, 1))
unknown_d5 = aim_gettlv8(tlvlist, 0x00d5, 1);
/*
* Type 0x00d6: Encoding 1 ("us-ascii")
*/
if (aim_gettlv(tlvlist, 0x000d6, 1))
;
/*
* Type 0x00d7: Language 1 ("en")
*/
if (aim_gettlv(tlvlist, 0x000d7, 1))
;
/*
* Type 0x00d8: Encoding 2 ("us-ascii")
*/
if (aim_gettlv(tlvlist, 0x000d8, 1))
;
/*
* Type 0x00d9: Language 2 ("en")
*/
if (aim_gettlv(tlvlist, 0x000d9, 1))
;
/*
* Type 0x00da: Maximum visible message length
*/
if (aim_gettlv(tlvlist, 0x000da, 1))
maxvisiblemsglen = aim_gettlv16(tlvlist, 0x00da, 1);
if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype))) {
ret = userfunc(sess,
rx,
&roominfo,
roomname,
usercount,
userinfo,
roomdesc,
flags,
creationtime,
maxmsglen,
unknown_d2,
unknown_d5,
maxvisiblemsglen);
}
free(roominfo.name);
free(userinfo);
free(roomname);
free(roomdesc);
aim_freetlvchain(&tlvlist);
return ret;
}
