/*
* Subtype 0x0005 - Send a Chat Message.
*
* Possible flags:
* AIM_CHATFLAGS_NOREFLECT -- Unset the flag that requests messages
* should be sent to their sender.
* AIM_CHATFLAGS_AWAY -- Mark the message as an autoresponse
* (Note that WinAIM does not honor this,
* and displays the message as normal.)
*
* XXX convert this to use tlvchains
*/
faim_export int aim_chat_send_im(aim_session_t *sess, aim_conn_t *conn, fu16_t flags, const char *msg, int msglen, const char *encoding, const char *language)
{
int i;
aim_frame_t *fr;
aim_msgcookie_t *cookie;
aim_snacid_t snacid;
fu8_t ckstr[8];
aim_tlvlist_t *otl = NULL, *itl = NULL;
if (!sess || !conn || !msg || (msglen <= 0))
return 0;
if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x02, 1152)))
return -ENOMEM;
snacid = aim_cachesnac(sess, 0x000e, 0x0005, 0x0000, NULL, 0);
aim_putsnac(&fr->data, 0x000e, 0x0005, 0x0000, snacid);
/*
* Cookie
*
* XXX mkcookie should generate the cookie and cache it in one
* operation to preserve uniqueness.
*/
for (i = 0; i < 8; i++)
ckstr[i] = (fu8_t)rand();
cookie = aim_mkcookie(ckstr, AIM_COOKIETYPE_CHAT, NULL);
cookie->data = NULL; /* XXX store something useful here */
aim_cachecookie(sess, cookie);
/* ICBM Header */
aimbs_putraw(&fr->data, ckstr, 8); /* Cookie */
aimbs_put16(&fr->data, 0x0003); /* Channel */
/*
* Type 1: Flag meaning this message is destined to the room.
*/
aim_tlvlist_add_noval(&otl, 0x0001);
/*
* Type 6: Reflect
*/
if (!(flags & AIM_CHATFLAGS_NOREFLECT))
aim_tlvlist_add_noval(&otl, 0x0006);
/*
* Type 7: Autoresponse
*/
if (flags & AIM_CHATFLAGS_AWAY)
aim_tlvlist_add_noval(&otl, 0x0007);
/*
* SubTLV: Type 1: Message
*/
aim_tlvlist_add_raw(&itl, 0x0001, msglen, msg);
/*
* SubTLV: Type 2: Encoding
*/
if (encoding != NULL)
aim_tlvlist_add_raw(&itl, 0x0002, strlen(encoding), encoding);
/*
* SubTLV: Type 3: Language
*/
if (language != NULL)
aim_tlvlist_add_raw(&itl, 0x0003, strlen(language), language);
/*
* Type 5: Message block. Contains more TLVs.
*
* This could include other information... We just
* put in a message TLV however.
*
*/
aim_tlvlist_add_frozentlvlist(&otl, 0x0005, &itl);
aim_tlvlist_write(&fr->data, &otl);
aim_tlvlist_free(&itl);
aim_tlvlist_free(&otl);
aim_tx_enqueue(sess, fr);
return 0;
}
/*
* Subtype 0x0005 - Send a Chat Message.
*
* Possible flags:
* AIM_CHATFLAGS_NOREFLECT -- Unset the flag that requests messages
* should be sent to their sender.
* AIM_CHATFLAGS_AWAY -- Mark the message as an autoresponse
* (Note that WinAIM does not honor this,
* and displays the message as normal.)
*
* XXX convert this to use tlvchains
*/
int
aim_chat_send_im(OscarData *od, FlapConnection *conn, guint16 flags, const gchar *msg, int msglen, const char *encoding, const char *language)
{
int i;
ByteStream bs;
IcbmCookie *cookie;
aim_snacid_t snacid;
guint8 ckstr[8];
GSList *tlvlist = NULL, *inner_tlvlist = NULL;
if (!od || !conn || !msg || (msglen <= 0))
return 0;
byte_stream_new(&bs, 1142);
snacid = aim_cachesnac(od, SNAC_FAMILY_CHAT, 0x0005, 0x0000, NULL, 0);
/*
* Cookie
*
* XXX mkcookie should generate the cookie and cache it in one
* operation to preserve uniqueness.
*/
for (i = 0; i < 8; i++)
ckstr[i] = (guint8)rand();
cookie = aim_mkcookie(ckstr, AIM_COOKIETYPE_CHAT, NULL);
cookie->data = NULL; /* XXX store something useful here */
aim_cachecookie(od, cookie);
/* ICBM Header */
byte_stream_putraw(&bs, ckstr, 8); /* Cookie */
byte_stream_put16(&bs, 0x0003); /* Channel */
/*
* Type 1: Flag meaning this message is destined to the room.
*/
aim_tlvlist_add_noval(&tlvlist, 0x0001);
/*
* Type 6: Reflect
*/
if (!(flags & AIM_CHATFLAGS_NOREFLECT))
aim_tlvlist_add_noval(&tlvlist, 0x0006);
/*
* Type 7: Autoresponse
*/
if (flags & AIM_CHATFLAGS_AWAY)
aim_tlvlist_add_noval(&tlvlist, 0x0007);
/*
* SubTLV: Type 1: Message
*/
aim_tlvlist_add_raw(&inner_tlvlist, 0x0001, msglen, (guchar *)msg);
/*
* SubTLV: Type 2: Encoding
*/
if (encoding != NULL)
aim_tlvlist_add_str(&inner_tlvlist, 0x0002, encoding);
/*
* SubTLV: Type 3: Language
*/
if (language != NULL)
aim_tlvlist_add_str(&inner_tlvlist, 0x0003, language);
/*
* Type 5: Message block. Contains more TLVs.
*
* This could include other information... We just
* put in a message TLV however.
*
*/
aim_tlvlist_add_frozentlvlist(&tlvlist, 0x0005, &inner_tlvlist);
aim_tlvlist_write(&bs, &tlvlist);
aim_tlvlist_free(inner_tlvlist);
aim_tlvlist_free(tlvlist);
flap_connection_send_snac(od, conn, SNAC_FAMILY_CHAT, 0x0005, snacid, &bs);
byte_stream_destroy(&bs);
return 0;
}
