*
*/
+#define FAIM_INTERNAL
#include <faim/aim.h>
/*
* when the message is received (of type 0x0004/0x000c)
*
*/
-u_long aim_send_im(struct aim_session_t *sess,
- struct aim_conn_t *conn,
- char *destsn, u_int flags, char *msg)
+faim_export unsigned long aim_send_im(struct aim_session_t *sess,
+ struct aim_conn_t *conn,
+ char *destsn, u_int flags, char *msg)
{
int curbyte,i;
- struct command_tx_struct newpacket;
+ struct command_tx_struct *newpacket;
- newpacket.lock = 1; /* lock struct */
- newpacket.type = 0x02; /* IMs are always family 0x02 */
- if (conn)
- newpacket.conn = conn;
- else
- newpacket.conn = aim_getconn_type(sess, AIM_CONN_TYPE_BOS);
+ if (strlen(msg) >= MAXMSGLEN)
+ return -1;
- /*
- * Its simplest to set this arbitrarily large and waste
- * space. Precalculating is costly here.
- */
- newpacket.commandlen = 1152;
+ if (!(newpacket = aim_tx_new(AIM_FRAMETYPE_OSCAR, 0x0002, conn, strlen(msg)+256)))
+ return -1;
- newpacket.data = (u_char *) calloc(1, newpacket.commandlen);
+ newpacket->lock = 1; /* lock struct */
curbyte = 0;
- curbyte += aim_putsnac(newpacket.data+curbyte,
+ curbyte += aim_putsnac(newpacket->data+curbyte,
0x0004, 0x0006, 0x0000, sess->snac_nextid);
/*
*
*/
for (i=0;i<8;i++)
- curbyte += aimutil_put8(newpacket.data+curbyte, (u_char) random());
+ curbyte += aimutil_put8(newpacket->data+curbyte, (u_char) rand());
/*
* Channel ID
*/
- curbyte += aimutil_put16(newpacket.data+curbyte,0x0001);
+ curbyte += aimutil_put16(newpacket->data+curbyte,0x0001);
/*
* Destination SN (prepended with byte length)
*/
- curbyte += aimutil_put8(newpacket.data+curbyte,strlen(destsn));
- curbyte += aimutil_putstr(newpacket.data+curbyte, destsn, strlen(destsn));
+ curbyte += aimutil_put8(newpacket->data+curbyte,strlen(destsn));
+ curbyte += aimutil_putstr(newpacket->data+curbyte, destsn, strlen(destsn));
/*
* metaTLV start.
*/
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0002);
- curbyte += aimutil_put16(newpacket.data+curbyte, strlen(msg) + 0x0d);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002);
+ curbyte += aimutil_put16(newpacket->data+curbyte, strlen(msg) + 0x10);
/*
- * Flag data?
+ * Flag data / ICBM Parameters?
*/
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0501);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0001);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0101);
- curbyte += aimutil_put8 (newpacket.data+curbyte, 0x01);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x05);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x01);
+
+ /* number of bytes to follow */
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0004);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x01);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x01);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x01);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x02);
+
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0101);
/*
* Message block length.
*/
- curbyte += aimutil_put16(newpacket.data+curbyte, strlen(msg) + 0x04);
+ curbyte += aimutil_put16(newpacket->data+curbyte, strlen(msg) + 0x04);
/*
* Character set data?
*/
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0000);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0000);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
/*
* Message. Not terminated.
*/
- curbyte += aimutil_putstr(newpacket.data+curbyte,msg, strlen(msg));
+ curbyte += aimutil_putstr(newpacket->data+curbyte,msg, strlen(msg));
/*
* Set the Request Acknowledge flag.
*/
- if (flags & AIM_IMFLAGS_ACK)
- {
- curbyte += aimutil_put16(newpacket.data+curbyte,0x0003);
- curbyte += aimutil_put16(newpacket.data+curbyte,0x0000);
- }
+ if (flags & AIM_IMFLAGS_ACK) {
+ curbyte += aimutil_put16(newpacket->data+curbyte,0x0003);
+ curbyte += aimutil_put16(newpacket->data+curbyte,0x0000);
+ }
/*
* Set the Autoresponse flag.
*/
- if (flags & AIM_IMFLAGS_AWAY)
- {
- curbyte += aimutil_put16(newpacket.data+curbyte,0x0004);
- curbyte += aimutil_put16(newpacket.data+curbyte,0x0000);
- }
+ if (flags & AIM_IMFLAGS_AWAY) {
+ curbyte += aimutil_put16(newpacket->data+curbyte,0x0004);
+ curbyte += aimutil_put16(newpacket->data+curbyte,0x0000);
+ }
+
+ newpacket->commandlen = curbyte;
+ newpacket->lock = 0;
+
+ aim_tx_enqueue(sess, newpacket);
+
+ aim_cachesnac(sess, 0x0004, 0x0006, 0x0000, destsn, strlen(destsn)+1);
+ aim_cleansnacs(sess, 60); /* clean out all SNACs over 60sec old */
+
+ return sess->snac_nextid;
+}
+
+faim_internal int aim_parse_outgoing_im_middle(struct aim_session_t *sess,
+ struct command_rx_struct *command)
+{
+ unsigned int i = 0, z;
+ rxcallback_t userfunc = NULL;
+ unsigned char cookie[8];
+ int channel;
+ struct aim_tlvlist_t *tlvlist;
+ char sn[MAXSNLEN];
+ unsigned short icbmflags = 0;
+ unsigned char flag1 = 0, flag2 = 0;
+ unsigned char *msgblock = NULL, *msg = NULL;
+
+ i = 10;
- newpacket.commandlen = curbyte;
+ /* ICBM Cookie. */
+ for (z=0; z<8; z++,i++)
+ cookie[z] = command->data[i];
- aim_tx_enqueue(sess, &newpacket);
+ /* Channel ID */
+ channel = aimutil_get16(command->data+i);
+ i += 2;
-#ifdef USE_SNAC_FOR_IMS
- {
- struct aim_snac_t snac;
+ if (channel != 0x01) {
+ printf("faim: icbm: ICBM recieved on unsupported channel. Ignoring. (chan = %04x)\n", channel);
+ return 1;
+ }
- snac.id = sess->snac_nextid;
- snac.family = 0x0004;
- snac.type = 0x0006;
- snac.flags = 0x0000;
+ strncpy(sn, (char *) command->data+i+1, (int) *(command->data+i));
+ i += 1 + (int) *(command->data+i);
- snac.data = malloc(strlen(destsn)+1);
- memcpy(snac.data, destsn, strlen(destsn)+1);
+ tlvlist = aim_readtlvchain(command->data+i, command->commandlen-i);
- aim_newsnac(sess, &snac);
+ if (aim_gettlv(tlvlist, 0x0003, 1))
+ icbmflags |= AIM_IMFLAGS_ACK;
+ if (aim_gettlv(tlvlist, 0x0004, 1))
+ icbmflags |= AIM_IMFLAGS_AWAY;
+
+ if (aim_gettlv(tlvlist, 0x0002, 1)) {
+ int j = 0;
+
+ msgblock = (unsigned char *)aim_gettlv_str(tlvlist, 0x0002, 1);
+
+ /* no, this really is correct. I'm not high or anything either. */
+ j += 2;
+ j += 2 + aimutil_get16(msgblock+j);
+ j += 2;
+
+ j += 2; /* final block length */
+
+ flag1 = aimutil_get16(msgblock);
+ j += 2;
+ flag2 = aimutil_get16(msgblock);
+ j += 2;
+
+ msg = msgblock+j;
}
- aim_cleansnacs(sess, 60); /* clean out all SNACs over 60sec old */
-#endif
+ if ((userfunc = aim_callhandler(command->conn, 0x0004, 0x0006)) || (i = 0))
+ i = userfunc(sess, command, channel, sn, msg, icbmflags, flag1, flag2);
+
+ if (msgblock)
+ free(msgblock);
+ aim_freetlvchain(&tlvlist);
- return (sess->snac_nextid++);
+ return 0;
}
/*
* room we're invited to, but obviously can't attend...
*
*/
-int aim_parse_incoming_im_middle(struct aim_session_t *sess,
- struct command_rx_struct *command)
+faim_internal int aim_parse_incoming_im_middle(struct aim_session_t *sess,
+ struct command_rx_struct *command)
{
u_int i = 0,z;
rxcallback_t userfunc = NULL;
}
/*
- * Source screen name.
- */
- memcpy(userinfo.sn, command->data+i+1, (int)command->data[i]);
- userinfo.sn[(int)command->data[i]] = '\0';
- i += 1 + (int)command->data[i];
-
- /*
- * Warning Level
- */
- userinfo.warnlevel = aimutil_get16(command->data+i); /* guess */
- i += 2;
-
- /*
- * Number of TLVs that follow. Not needed.
+ * Extract the standard user info block.
+ *
+ * Note that although this contains TLVs that appear contiguous
+ * with the TLVs read below, they are two different pieces. The
+ * userinfo block contains the number of TLVs that contain user
+ * information, the rest are not even though there is no seperation.
+ * aim_extractuserinfo() returns the number of bytes used by the
+ * userinfo tlvs, so you can start reading the rest of them right
+ * afterward.
+ *
+ * That also means that TLV types can be duplicated between the
+ * userinfo block and the rest of the message, however there should
+ * never be two TLVs of the same type in one block.
+ *
*/
- wastebits = aimutil_get16(command->data+i);
- i += 2;
+ i += aim_extractuserinfo(command->data+i, &userinfo);
/*
- * Read block of TLVs. All further data is derived
- * from what is parsed here.
+ * Read block of TLVs (not including the userinfo data). All
+ * further data is derived from what is parsed here.
*/
tlvlist = aim_readtlvchain(command->data+i, command->commandlen-i);
u_int j = 0, y = 0, z = 0;
char *msg = NULL;
u_int icbmflags = 0;
- struct aim_tlv_t *msgblocktlv, *tmptlv;
+ struct aim_tlv_t *msgblocktlv;
u_char *msgblock;
u_short flag1,flag2;
/*
* Check Autoresponse status. If it is an autoresponse,
- * it will contain a second type 0x0004 TLV, with zero length.
+ * it will contain a type 0x0004 TLV, with zero length.
*/
- if (aim_gettlv(tlvlist, 0x0004, 2))
+ if (aim_gettlv(tlvlist, 0x0004, 1))
icbmflags |= AIM_IMFLAGS_AWAY;
/*
* Check Ack Request status.
*/
- if (aim_gettlv(tlvlist, 0x0003, 2))
+ if (aim_gettlv(tlvlist, 0x0003, 1))
icbmflags |= AIM_IMFLAGS_ACK;
- /*
- * Extract the various pieces of the userinfo struct.
- */
- /* Class. */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0001, 1)))
- userinfo.class = aimutil_get16(tmptlv->value);
- /* Member-since date. */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0002, 1)))
- {
- /* If this is larger than 4, its probably the message block, skip */
- if (tmptlv->length <= 4)
- userinfo.membersince = aimutil_get32(tmptlv->value);
- }
- /* On-since date */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0003, 1)))
- userinfo.onlinesince = aimutil_get32(tmptlv->value);
- /* Idle-time */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0004, 1)))
- userinfo.idletime = aimutil_get16(tmptlv->value);
- /* Session Length (AIM) */
- if ((tmptlv = aim_gettlv(tlvlist, 0x000f, 1)))
- userinfo.sessionlen = aimutil_get16(tmptlv->value);
- /* Session Length (AOL) */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0010, 1)))
- userinfo.sessionlen = aimutil_get16(tmptlv->value);
-
/*
* Message block.
- *
- * XXX: Will the msgblock always be the second 0x0002?
*/
msgblocktlv = aim_gettlv(tlvlist, 0x0002, 1);
- if (!msgblocktlv)
- {
- printf("faim: icbm: major error! no message block TLV found!\n");
- aim_freetlvchain(&tlvlist);
- return 1;
- }
+ if (!msgblocktlv || !msgblocktlv->value) {
+ printf("faim: icbm: major error! no message block TLV found!\n");
+ aim_freetlvchain(&tlvlist);
+ return 1;
+ }
/*
* Extracting the message from the unknown cruft.
}
else if (channel == 0x0002)
{
- int rendtype;
struct aim_tlv_t *block1;
struct aim_tlvlist_t *list2;
- struct aim_tlv_t *tmptlv;
- int a;
+ unsigned short reqclass = 0;
+ unsigned short status = 0;
- /* Class. */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0001, 1)))
- userinfo.class = aimutil_get16(tmptlv->value);
- /* On-since date */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0003, 1)))
- userinfo.onlinesince = aimutil_get32(tmptlv->value);
- /* Idle-time */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0004, 1)))
- userinfo.idletime = aimutil_get16(tmptlv->value);
- /* Session Length (AIM) */
- if ((tmptlv = aim_gettlv(tlvlist, 0x000f, 1)))
- userinfo.sessionlen = aimutil_get16(tmptlv->value);
- /* Session Length (AOL) */
- if ((tmptlv = aim_gettlv(tlvlist, 0x0010, 1)))
- userinfo.sessionlen = aimutil_get16(tmptlv->value);
-
/*
* There's another block of TLVs embedded in the type 5 here.
*/
block1 = aim_gettlv(tlvlist, 0x0005, 1);
- if (!block1)
+ if (!block1) {
+ printf("faim: no tlv 0x0005 in rendezvous transaction!\n");
+ aim_freetlvchain(&tlvlist);
return 1; /* major problem */
+ }
- a = 0x1a; /* skip -- not sure what this information is! */
+ /*
+ * First two bytes represent the status of the connection.
+ *
+ * 0 is a request, 2 is an accept
+ */
+ status = aimutil_get16(block1->value+0);
+
+ /*
+ * Next comes the cookie. Should match the ICBM cookie.
+ */
+ if (memcmp(block1->value+2, cookie, 8) != 0)
+ printf("faim: rend: warning cookies don't match!\n");
/*
- * XXX: Ignore if there's no data, only cookie information.
+ * The next 16bytes are a capability block so we can
+ * identify what type of rendezvous this is.
+ *
+ * Thanks to Eric Warmenhoven <warmenhoven@linux.com> (of GAIM)
+ * for pointing some of this out to me. In fact, a lot of
+ * the client-to-client info comes from the work of the GAIM
+ * developers. Thanks!
*
- * Its probably just an accepted invitation or something.
- *
+ * Read off one capability string and we should have it ID'd.
+ *
*/
- if (block1->length <= 0x1a)
- {
- aim_freetlvchain(&tlvlist);
- return 1;
- }
+ reqclass = aim_getcap(block1->value+2+8, 0x10);
+ if (reqclass == 0x0000) {
+ printf("faim: rend: no ID block\n");
+ aim_freetlvchain(&tlvlist);
+ return 1;
+ }
- list2 = aim_readtlvchain(block1->value+a, block1->length-a);
-
- if (aim_gettlv(list2, 0x0004, 1) /* start connection */ ||
- aim_gettlv(list2, 0x000b, 1) /* close conncetion */)
- {
- rendtype = 1; /* voice request */
-
- /*
- * Call client.
- */
- userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
- if (userfunc)
- i = userfunc(sess,
- command,
- channel,
- rendtype,
- &userinfo);
- else
- i = 0;
+ /*
+ * What follows may be TLVs or nothing, depending on the
+ * purpose of the message.
+ *
+ * Ack packets for instance have nothing more to them.
+ */
+ list2 = aim_readtlvchain(block1->value+2+8+16, block1->length-2-8-16);
+
+ if (!list2 || ((reqclass != AIM_CAPS_IMIMAGE) && !(aim_gettlv(list2, 0x2711, 1)))) {
+ struct aim_msgcookie_t *cook;
+ int type;
+
+ type = aim_msgcookie_gettype(reqclass); /* XXX: fix this shitty code */
+
+ if(type != 17) {
+ if ((cook = aim_uncachecookie(sess, cookie, type)) == NULL) {
+ printf("faim: non-data rendezvous thats not in cache!\n");
+ aim_freetlvchain(&list2);
+ aim_freetlvchain(&tlvlist);
+ return 1;
+ }
}
- else
- {
- struct aim_chat_roominfo roominfo;
- char *msg=NULL,*encoding=NULL,*lang=NULL;
-
- rendtype = 0; /* chat invite */
- if (aim_gettlv(list2, 0x2711, 1))
- {
- struct aim_tlv_t *nametlv;
+
+ if (cook->type == AIM_COOKIETYPE_OFTGET) {
+ struct aim_filetransfer_priv *ft;
+
+ if (cook->data) {
+ int errorcode = -1; /* XXX shouldnt this be 0? */
+
+ ft = (struct aim_filetransfer_priv *)cook->data;
+
+ if(status != 0x0002) {
+ if (aim_gettlv(list2, 0x000b, 1))
+ errorcode = aim_gettlv16(list2, 0x000b, 1);
- nametlv = aim_gettlv(list2, 0x2711, 1);
- aim_chat_readroominfo(nametlv->value, &roominfo);
+ if (errorcode)
+ printf("faim: transfer from %s (%s) for %s cancelled (error code %d)\n", ft->sn, ft->ip, ft->fh.name, errorcode);
}
+ } else {
+ printf("faim: no data attached to file transfer\n");
+ }
+ } else if (cook->type == AIM_CAPS_VOICE) {
+ printf("faim: voice request cancelled\n");
+ } else {
+ printf("faim: unknown cookie cache type %d\n", cook->type);
+ }
+
+ if (list2)
+ aim_freetlvchain(&list2);
+ aim_freetlvchain(&tlvlist);
+ return 1;
+ }
+
+ /*
+ * The rest of the handling depends on what type it is.
+ */
+ if (reqclass & AIM_CAPS_BUDDYICON) {
+
+ /*
+ * Call client.
+ */
+#if 0
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0))
+ i = userfunc(sess,
+ command,
+ channel,
+ reqclass,
+ &userinfo,
+ ip,
+ cookie);
+#endif
+
+ } else if (reqclass & AIM_CAPS_VOICE) {
+ struct aim_msgcookie_t *cachedcook;
+
+ printf("faim: rend: voice!\n");
+
+ if(!(cachedcook = (struct aim_msgcookie_t*)calloc(1, sizeof(struct aim_msgcookie_t))))
+ return 1;
+
+ memcpy(cachedcook->cookie, cookie, 8);
+ cachedcook->type = AIM_COOKIETYPE_OFTVOICE;
+ cachedcook->data = NULL;
+
+ if (aim_cachecookie(sess, cachedcook) != 0)
+ printf("faim: ERROR caching message cookie\n");
+
+ /* XXX: implement all this */
+
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0)) {
+ i = userfunc(sess, command, channel, reqclass, &userinfo);
+ }
+ } else if ((reqclass & AIM_CAPS_IMIMAGE) || (reqclass & AIM_CAPS_BUDDYICON)) {
+ char ip[30];
+ struct aim_directim_priv *priv;
+
+ memset(ip, 0, 30);
+
+ if (aim_gettlv(list2, 0x0003, 1) && aim_gettlv(list2, 0x0005, 1)) {
+ struct aim_tlv_t *iptlv, *porttlv;
- if (aim_gettlv(list2, 0x000c, 1))
- msg = aim_gettlv_str(list2, 0x000c, 1);
+ iptlv = aim_gettlv(list2, 0x0003, 1);
+ porttlv = aim_gettlv(list2, 0x0005, 1);
+
+ snprintf(ip, 30, "%d.%d.%d.%d:%d",
+ aimutil_get8(iptlv->value+0),
+ aimutil_get8(iptlv->value+1),
+ aimutil_get8(iptlv->value+2),
+ aimutil_get8(iptlv->value+3),
+ 4443 /*aimutil_get16(porttlv->value)*/);
+ }
+
+ printf("faim: rend: directIM request from %s (%s)\n",
+ userinfo.sn,
+ ip);
+
+ /* XXX: there are a couple of different request packets for
+ * different things */
+
+ priv = (struct aim_directim_priv *)calloc(1, sizeof(struct aim_directim_priv));
+ memcpy(priv->ip, ip, sizeof(priv->ip));
+ memcpy(priv->sn, userinfo.sn, sizeof(priv->sn));
+ memcpy(priv->cookie, cookie, sizeof(priv->cookie));
+
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0))
+ i = userfunc(sess,
+ command,
+ channel,
+ reqclass,
+ &userinfo, priv);
+
+ } else if (reqclass & AIM_CAPS_CHAT) {
+ struct aim_tlv_t *miscinfo;
+ struct aim_chat_roominfo roominfo;
+ char *msg=NULL,*encoding=NULL,*lang=NULL;
+
+ miscinfo = aim_gettlv(list2, 0x2711, 1);
+ aim_chat_readroominfo(miscinfo->value, &roominfo);
+
+ if (aim_gettlv(list2, 0x000c, 1))
+ msg = aim_gettlv_str(list2, 0x000c, 1);
- if (aim_gettlv(list2, 0x000d, 1))
- encoding = aim_gettlv_str(list2, 0x000d, 1);
+ if (aim_gettlv(list2, 0x000d, 1))
+ encoding = aim_gettlv_str(list2, 0x000d, 1);
- if (aim_gettlv(list2, 0x000e, 1))
- lang = aim_gettlv_str(list2, 0x000e, 1);
-
- /*
- * Call client.
- */
- userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
- if (userfunc)
- i = userfunc(sess,
- command,
- channel,
- rendtype,
- &userinfo,
- &roominfo,
- msg,
- encoding?encoding+1:NULL,
- lang?lang+1:NULL);
- else
- i = 0;
+ if (aim_gettlv(list2, 0x000e, 1))
+ lang = aim_gettlv_str(list2, 0x000e, 1);
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0))
+ i = userfunc(sess,
+ command,
+ channel,
+ reqclass,
+ &userinfo,
+ &roominfo,
+ msg,
+ encoding?encoding+1:NULL,
+ lang?lang+1:NULL);
free(roominfo.name);
free(msg);
free(encoding);
free(lang);
+ } else if (reqclass & AIM_CAPS_GETFILE) {
+ char ip[30];
+ struct aim_msgcookie_t *cachedcook;
+ struct aim_tlv_t *miscinfo;
+
+ if (!(cachedcook = calloc(1, sizeof(struct aim_msgcookie_t))))
+ return 0;
+
+ memset(ip, 0, 30);
+
+ if (!(miscinfo = aim_gettlv(list2, 0x2711, 1))) {
+ free(cachedcook);
+ return 0;
+ }
+
+ if (aim_gettlv(list2, 0x0003, 1) && aim_gettlv(list2, 0x0005, 1)) {
+ struct aim_tlv_t *iptlv, *porttlv;
+
+ if (!(iptlv = aim_gettlv(list2, 0x0003, 1)) || !(porttlv = aim_gettlv(list2, 0x0005, 1))) {
+ free(cachedcook);
+ return 0;
+ }
+
+ snprintf(ip, 30, "%d.%d.%d.%d:%d",
+ aimutil_get8(iptlv->value+0),
+ aimutil_get8(iptlv->value+1),
+ aimutil_get8(iptlv->value+2),
+ aimutil_get8(iptlv->value+3),
+ aimutil_get16(porttlv->value));
+ }
+
+ printf("faim: rend: file get request from %s (%s)\n", userinfo.sn, ip);
+
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0))
+ i = userfunc(sess,
+ command,
+ channel,
+ reqclass,
+ &userinfo,
+ ip,
+ cookie);
+
+ } else if (reqclass & AIM_CAPS_SENDFILE) {
+#if 0
+ char ip[30];
+ char *desc = NULL;
+ struct aim_msgcookie_t *cachedcook;
+ struct aim_filetransfer_priv *ft;
+ struct aim_tlv_t *miscinfo;
+
+ memset(ip, 0, sizeof(ip));
+
+ if (!(miscinfo = aim_gettlv(list2, 0x2711, 1)))
+ return 0;
+
+ if (aim_gettlv(list2, 0x0003, 1) && aim_gettlv(list2, 0x0003, 1)) {
+ struct aim_tlv_t *iptlv, *porttlv;
+
+ iptlv = aim_gettlv(list2, 0x0003, 1);
+ porttlv = aim_gettlv(list2, 0x0005, 1);
+
+ snprintf(ip, sizeof(ip)-1, "%d.%d.%d.%d:%d",
+ aimutil_get8(iptlv->value+0),
+ aimutil_get8(iptlv->value+1),
+ aimutil_get8(iptlv->value+2),
+ aimutil_get8(iptlv->value+3),
+ aimutil_get16(porttlv->value));
+ }
+
+ if (aim_gettlv(list2, 0x000c, 1)) {
+ desc = aim_gettlv_str(list2, 0x000c, 1);
}
+
+ printf("faim: rend: file transfer request from %s for %s: %s (%s)\n",
+ userinfo.sn,
+ miscinfo->value+8,
+ desc,
+ ip);
+
+ memcpy(cachedcook->cookie, cookie, 8);
+
+ ft = malloc(sizeof(struct aim_filetransfer_priv));
+ strncpy(ft->sn, userinfo.sn, sizeof(ft->sn));
+ strncpy(ft->ip, ip, sizeof(ft->ip));
+ strncpy(ft->fh.name, miscinfo->value+8, sizeof(ft->fh.name));
+ cachedcook->type = AIM_COOKIETYPE_OFTSEND;
+ cachedcook->data = ft;
+
+ if (aim_cachecookie(sess, cachedcook) != 0)
+ printf("faim: ERROR caching message cookie\n");
+
+
+ aim_accepttransfer(sess, command->conn, ft->sn, cookie, AIM_CAPS_SENDFILE);
+
+ if (desc)
+ free(desc);
+#endif
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x0007);
+ if (userfunc || (i = 0))
+ i = userfunc(sess,
+ command,
+ channel,
+ reqclass,
+ &userinfo);
+ } else {
+ printf("faim: rend: unknown rendezvous 0x%04x\n", reqclass);
+ }
+
aim_freetlvchain(&list2);
}
return i;
}
+/*
+ * Possible codes:
+ * AIM_TRANSFER_DENY_NOTSUPPORTED -- "client does not support"
+ * AIM_TRANSFER_DENY_DECLINE -- "client has declined transfer"
+ * AIM_TRANSFER_DENY_NOTACCEPTING -- "client is not accepting transfers"
+ *
+ */
+faim_export unsigned long aim_denytransfer(struct aim_session_t *sess,
+ struct aim_conn_t *conn,
+ char *sender,
+ char *cookie,
+ unsigned short code)
+{
+ struct command_tx_struct *newpacket;
+ int curbyte, i;
+
+ if(!(newpacket = aim_tx_new(AIM_FRAMETYPE_OSCAR, 0x0002, conn, 10+8+2+1+strlen(sender)+6)))
+ return -1;
+
+ newpacket->lock = 1;
+
+ curbyte = aim_putsnac(newpacket->data, 0x0004, 0x000b, 0x0000, sess->snac_nextid);
+ for (i = 0; i < 8; i++)
+ curbyte += aimutil_put8(newpacket->data+curbyte, cookie[i]);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002);
+ curbyte += aimutil_put8(newpacket->data+curbyte, strlen(sender));
+ curbyte += aimutil_putstr(newpacket->data+curbyte, sender, strlen(sender));
+ curbyte += aim_puttlv_16(newpacket->data+curbyte, 0x0003, code);
+
+ newpacket->lock = 0;
+ aim_tx_enqueue(sess, newpacket);
+
+ return (sess->snac_nextid++);
+}
+
/*
* Not real sure what this does, nor does anyone I've talk to.
*
* idea.
*
*/
-u_long aim_seticbmparam(struct aim_session_t *sess,
- struct aim_conn_t *conn)
+faim_export unsigned long aim_seticbmparam(struct aim_session_t *sess,
+ struct aim_conn_t *conn)
{
- struct command_tx_struct newpacket;
+ struct command_tx_struct *newpacket;
int curbyte;
- newpacket.lock = 1;
- if (conn)
- newpacket.conn = conn;
- else
- newpacket.conn = aim_getconn_type(sess, AIM_CONN_TYPE_BOS);
- newpacket.type = 0x02;
-
- newpacket.commandlen = 10 + 16;
- newpacket.data = (u_char *) malloc (newpacket.commandlen);
-
- curbyte = aim_putsnac(newpacket.data, 0x0004, 0x0002, 0x0000, sess->snac_nextid);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0000);
- curbyte += aimutil_put32(newpacket.data+curbyte, 0x00000003);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0x1f);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0x40);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0x03);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0xe7);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0x03);
- curbyte += aimutil_put8(newpacket.data+curbyte, 0xe7);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0000);
- curbyte += aimutil_put16(newpacket.data+curbyte, 0x0000);
-
- aim_tx_enqueue(sess, &newpacket);
+ if(!(newpacket = aim_tx_new(AIM_FRAMETYPE_OSCAR, 0x0002, conn, 10+16)))
+ return -1;
+
+ newpacket->lock = 1;
+
+ curbyte = aim_putsnac(newpacket->data, 0x0004, 0x0002, 0x0000, sess->snac_nextid);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
+ curbyte += aimutil_put32(newpacket->data+curbyte, 0x00000003);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x1f);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x40);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x03);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0xe7);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0x03);
+ curbyte += aimutil_put8(newpacket->data+curbyte, 0xe7);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
+ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
+
+ newpacket->lock = 0;
+ aim_tx_enqueue(sess, newpacket);
return (sess->snac_nextid++);
}
-int aim_parse_msgerror_middle(struct aim_session_t *sess,
- struct command_rx_struct *command)
+faim_internal int aim_parse_msgerror_middle(struct aim_session_t *sess,
+ struct command_rx_struct *command)
{
u_long snacid = 0x000000000;
struct aim_snac_t *snac = NULL;
int ret = 0;
rxcallback_t userfunc = NULL;
+ char *dest;
+ unsigned short reason = 0;
/*
* Get SNAC from packet and look it up
snacid = aimutil_get32(command->data+6);
snac = aim_remsnac(sess, snacid);
- if (!snac)
- {
- printf("faim: msgerr: got an ICBM-failed error on an unknown SNAC ID! (%08lx)\n", snacid);
- }
+ if (!snac) {
+ printf("faim: msgerr: got an ICBM-failed error on an unknown SNAC ID! (%08lx)\n", snacid);
+ dest = NULL;
+ } else
+ dest = snac->data;
+
+ reason = aimutil_get16(command->data+10);
/*
* Call client.
*/
userfunc = aim_callhandler(command->conn, 0x0004, 0x0001);
if (userfunc)
- ret = userfunc(sess, command, (snac)?snac->data:"(UNKNOWN)");
+ ret = userfunc(sess, command, dest, reason);
else
ret = 0;
- free(snac->data);
- free(snac);
+ if (snac) {
+ free(snac->data);
+ free(snac);
+ }
return ret;
}
+faim_internal int aim_parse_missedcall(struct aim_session_t *sess,
+ struct command_rx_struct *command)
+{
+ int i, ret = 1;
+ rxcallback_t userfunc = NULL;
+ unsigned short channel, nummissed, reason;
+ struct aim_userinfo_s userinfo;
+
+ i = 10; /* Skip SNAC header */
+
+
+ /*
+ * XXX: supposedly, this entire packet can repeat as many times
+ * as necessary. Should implement that.
+ */
+
+ /*
+ * Channel ID.
+ */
+ channel = aimutil_get16(command->data+i);
+ i += 2;
+
+ /*
+ * Extract the standard user info block.
+ */
+ i += aim_extractuserinfo(command->data+i, &userinfo);
+
+ nummissed = aimutil_get16(command->data+i);
+ i += 2;
+
+ reason = aimutil_get16(command->data+i);
+ i += 2;
+
+ /*
+ * Call client.
+ */
+ userfunc = aim_callhandler(command->conn, 0x0004, 0x000a);
+ if (userfunc)
+ ret = userfunc(sess, command, channel, &userinfo, nummissed, reason);
+ else
+ ret = 0;
+
+ return ret;
+}
andersk / libfaim.git / blobdiff