Mercurial > pidgin.yaz
view src/protocols/oscar/ft.c @ 4317:7c9f3d0fe8b2
[gaim-migrate @ 4571]
Eh, nothing really. Very minor clean up stuff.
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Thu, 16 Jan 2003 00:49:15 +0000 |
parents | 9891c1458eb7 |
children | 858979ab3867 |
line wrap: on
line source
/* * File transfer (OFT) and DirectIM (ODC). * (OSCAR File Transfer, Oscar Direct Connect(ion?) */ #define FAIM_INTERNAL #ifdef HAVE_CONFIG_H #include <config.h> #endif #include <aim.h> #ifndef _WIN32 #include <netdb.h> #include <sys/socket.h> #include <netinet/in.h> #include <sys/utsname.h> /* for aim_directim_initiate */ #include <arpa/inet.h> /* for inet_ntoa */ #define G_DIR_SEPARATOR '/' #endif #ifdef _WIN32 #include "win32dep.h" #endif #define AIM_OFT_PROTO_OFFER 0x0101 #define AIM_OFT_PROTO_ACCEPT 0x0202 #define AIM_OFT_PROTO_RESUME 0x0205 #define AIM_OFT_PROTO_RESUMEACCEPT 0x0207 #define AIM_OFT_PROTO_ACK 0x0204 struct aim_filetransfer_priv { char sn[MAXSNLEN+1]; char cookie[8]; char ip[30]; int state; struct aim_fileheader_t fh; }; struct aim_directim_intdata { fu8_t cookie[8]; char sn[MAXSNLEN+1]; char ip[22]; }; static int listenestablish(fu16_t portnum); static struct aim_fileheader_t *aim_oft_getfh(aim_bstream_t *bs); static void oft_dirconvert(char *name); static int aim_oft_buildheader(aim_bstream_t *bs, struct aim_fileheader_t *fh); /** * aim_handlerendconnect - call this to accept OFT connections and set up the required structures * @sess: the session * @cur: the conn the incoming connection is on * * call this when you get an outstanding read on a conn with subtype * AIM_CONN_SUBTYPE_RENDEZVOUS_OUT, it will clone the current * &aim_conn_t and tweak things as appropriate. the new conn and the * listener conn are both returned to the client in the * %AIM_CB_FAM_OFT, %AIM_CB_OFT_<CLASS>INITIATE callback. */ faim_export int aim_handlerendconnect(aim_session_t *sess, aim_conn_t *cur) { int acceptfd = 0; struct sockaddr cliaddr; int clilen = sizeof(cliaddr); int ret = 0; aim_conn_t *newconn; if ((acceptfd = accept(cur->fd, &cliaddr, &clilen)) == -1) return 0; /* not an error */ if (cliaddr.sa_family != AF_INET) { /* just in case IPv6 really is happening */ close(acceptfd); aim_conn_close(cur); return -1; } if (!(newconn = aim_cloneconn(sess, cur))) { close(acceptfd); aim_conn_close(cur); return -1; } newconn->type = AIM_CONN_TYPE_RENDEZVOUS; newconn->fd = acceptfd; if (newconn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM) { struct aim_directim_intdata *priv; aim_rxcallback_t userfunc; priv = (struct aim_directim_intdata *)(newconn->internal = cur->internal); cur->internal = NULL; snprintf(priv->ip, sizeof(priv->ip), "%s:%u", inet_ntoa(((struct sockaddr_in *)&cliaddr)->sin_addr), ntohs(((struct sockaddr_in *)&cliaddr)->sin_port)); if ((userfunc = aim_callhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINITIATE))) ret = userfunc(sess, NULL, newconn, cur); } else if (newconn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) { #if 0 struct aim_filetransfer_priv *priv; aim_rxcallback_t userfunc; newconn->priv = cur->priv; cur->priv = NULL; priv = (struct aim_filetransfer_priv *)newconn->priv; snprintf(priv->ip, sizeof(priv->ip), "%s:%u", inet_ntoa(((struct sockaddr_in *)&cliaddr)->sin_addr), ntohs(((struct sockaddr_in *)&cliaddr)->sin_port)); if ((userfunc = aim_callhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEINITIATE))) ret = userfunc(sess, NULL, newconn, cur); #endif } else if (newconn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE) { struct aim_filetransfer_priv *ft; aim_rxcallback_t userfunc; /* The new conn automatically inherits the internal value * of cur. */ cur->internal = NULL; ft = (struct aim_filetransfer_priv *)newconn->internal; snprintf(ft->ip, sizeof(ft->ip), "%s:%u", inet_ntoa(((struct sockaddr_in *)&cliaddr)->sin_addr), ntohs(((struct sockaddr_in *)&cliaddr)->sin_port)); if ((userfunc = aim_callhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_SENDFILEINITIATE))) ret = userfunc(sess, NULL, newconn, cur); } else { faimdprintf(sess, 1,"Got a Connection on a listener that's not Rendezvous Closing conn.\n"); aim_conn_close(newconn); ret = -1; } return ret; } /** * aim_send_typing - send client-to-client typing notification over established connection * @sess: session to conn * @conn: directim connection * @typing: If true, notify user has started typing; if false, notify user has stopped. * * The connection must have been previously established. */ faim_export int aim_send_typing(aim_session_t *sess, aim_conn_t *conn, int typing) { struct aim_directim_intdata *intdata = (struct aim_directim_intdata *)conn->internal; aim_frame_t *fr; aim_bstream_t *hdrbs; fu8_t *hdr; int hdrlen = 0x44; if (!sess || !conn || (conn->type != AIM_CONN_TYPE_RENDEZVOUS)) return -EINVAL; if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x01, 0))) return -ENOMEM; memcpy(fr->hdr.rend.magic, "ODC2", 4); fr->hdr.rend.hdrlen = hdrlen; if (!(hdr = calloc(1, hdrlen))) { aim_frame_destroy(fr); return -ENOMEM; } hdrbs = &(fr->data); aim_bstream_init(hdrbs, hdr, hdrlen); aimbs_put16(hdrbs, 0x0006); aimbs_put16(hdrbs, 0x0000); aimbs_putraw(hdrbs, intdata->cookie, 8); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put32(hdrbs, 0x00000000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); /* flags -- 0x000e for "started typing", 0x0002 for "stopped typing */ aimbs_put16(hdrbs, ( typing ? 0x000e : 0x0002)); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_putraw(hdrbs, sess->sn, strlen(sess->sn)); aim_bstream_setpos(hdrbs, 52); /* bleeehh */ aimbs_put8(hdrbs, 0x00); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put8(hdrbs, 0x00); /* end of hdr */ aim_tx_enqueue(sess, fr); return 0; } /** * aim_send_im_direct - send IM client-to-client over established connection * @sess: session to conn * @conn: directim connection * @msg: null-terminated string to send. * @len: The length of the message to send, including binary data. * @encoding: 0 for ascii, 2 for Unicode, 3 for ISO 8859-1 * * Call this just like you would aim_send_im, to send a directim. You * _must_ have previously established the directim connection. */ faim_export int aim_send_im_direct(aim_session_t *sess, aim_conn_t *conn, const char *msg, int len, int encoding) { struct aim_directim_intdata *intdata = (struct aim_directim_intdata *)conn->internal; aim_frame_t *fr; aim_bstream_t *hdrbs; int hdrlen = 0x44; fu8_t *hdr; if (!sess || !conn || !msg || (conn->type != AIM_CONN_TYPE_RENDEZVOUS)) return -EINVAL; if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x01, len))) return -ENOMEM; memcpy(fr->hdr.rend.magic, "ODC2", 4); fr->hdr.rend.hdrlen = hdrlen; if (!(hdr = calloc(1, hdrlen + len))) { aim_frame_destroy(fr); return -ENOMEM; } hdrbs = &(fr->data); aim_bstream_init(hdrbs, hdr, hdrlen + len); aimbs_put16(hdrbs, 0x0006); aimbs_put16(hdrbs, 0x0000); aimbs_putraw(hdrbs, intdata->cookie, 8); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put32(hdrbs, len); aimbs_put16(hdrbs, encoding); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); /* flags -- 0x000e for "started typing", 0x0002 for "stopped typing, 0x0000 for message */ aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_putraw(hdrbs, sess->sn, strlen(sess->sn)); aim_bstream_setpos(hdrbs, 52); /* bleeehh */ aimbs_put8(hdrbs, 0x00); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put16(hdrbs, 0x0000); aimbs_put8(hdrbs, 0x00); /* end of hdr2 */ #if 0 /* XXX this is how you send buddy icon info... */ i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0008); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x000c); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0000); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x1466); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0001); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x2e0f); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x393e); i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0xcac8); #endif aimbs_putraw(hdrbs, msg, len); aim_tx_enqueue(sess, fr); return 0; } static int getlocalip(fu8_t *ip) { struct hostent *hptr; char localhost[129]; /* XXX if available, use getaddrinfo() */ /* XXX allow client to specify which IP to use for multihomed boxes */ if (gethostname(localhost, 128) < 0) return -1; if (!(hptr = gethostbyname(localhost))) return -1; memcpy(ip, hptr->h_addr_list[0], 4); return 0; } /** * aim_directim_intitiate - For those times when we want to open up the directim channel ourselves. * @sess: your session, * @conn: the BOS conn, * @priv: a dummy priv value (we'll let it get filled in later) (if you pass a %NULL, we alloc one) * @destsn: the SN to connect to. * */ faim_export aim_conn_t *aim_directim_initiate(aim_session_t *sess, const char *destsn) { aim_conn_t *newconn; aim_msgcookie_t *cookie; struct aim_directim_intdata *priv; int listenfd; fu16_t port = 4443; fu8_t localip[4]; fu8_t ck[8]; if (getlocalip(localip) == -1) return NULL; if ((listenfd = listenestablish(port)) == -1) return NULL; aim_request_directim(sess, destsn, localip, port, ck); cookie = (aim_msgcookie_t *)calloc(1, sizeof(aim_msgcookie_t)); memcpy(cookie->cookie, ck, 8); cookie->type = AIM_COOKIETYPE_OFTIM; /* this one is for the cookie */ priv = (struct aim_directim_intdata *)calloc(1, sizeof(struct aim_directim_intdata)); memcpy(priv->cookie, ck, 8); strncpy(priv->sn, destsn, sizeof(priv->sn)); cookie->data = priv; aim_cachecookie(sess, cookie); /* XXX switch to aim_cloneconn()? */ if (!(newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS_OUT, NULL))) { close(listenfd); return NULL; } /* this one is for the conn */ priv = (struct aim_directim_intdata *)calloc(1, sizeof(struct aim_directim_intdata)); memcpy(priv->cookie, ck, 8); strncpy(priv->sn, destsn, sizeof(priv->sn)); newconn->fd = listenfd; newconn->subtype = AIM_CONN_SUBTYPE_OFT_DIRECTIM; newconn->internal = priv; newconn->lastactivity = time(NULL); faimdprintf(sess, 2,"faim: listening (fd = %d, unconnected)\n", newconn->fd); return newconn; } /** * aim_sendfile_intitiate - For those times when we want to send the file ourselves. * @sess: your session, * @conn: the BOS conn, * @destsn: the SN to connect to. * @filename: the name of the files you want to send * */ faim_export aim_conn_t *aim_sendfile_initiate(aim_session_t *sess, const char *destsn, const char *filename, fu16_t numfiles, fu32_t totsize, char *cookret) { aim_conn_t *newconn; aim_msgcookie_t *cookie; struct aim_filetransfer_priv *ft; int listenfd; /* XXX allow different ports */ fu16_t port = 4443; fu8_t localip[4]; fu8_t ck[8]; if (getlocalip(localip) == -1) return NULL; if ((listenfd = listenestablish(port)) == -1) return NULL; aim_request_sendfile(sess, destsn, filename, numfiles, totsize, localip, port, ck); cookie = (aim_msgcookie_t *)calloc(1, sizeof(aim_msgcookie_t)); memcpy(cookie->cookie, ck, 8); cookie->type = AIM_COOKIETYPE_OFTSEND; memcpy(cookret, ck, 8); /* this one is for the cookie */ ft = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv)); memcpy(ft->cookie, ck, 8); strncpy(ft->sn, destsn, sizeof(ft->sn)); cookie->data = ft; aim_cachecookie(sess, cookie); if (!(newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS_OUT, NULL))) { close(listenfd); return NULL; } /* this one is for the conn */ ft = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv)); memcpy(ft->cookie, ck, 8); strncpy(ft->sn, destsn, sizeof(ft->sn)); newconn->fd = listenfd; newconn->subtype = AIM_CONN_SUBTYPE_OFT_SENDFILE; newconn->internal = ft; newconn->lastactivity = time(NULL); faimdprintf(sess, 2,"faim: listening (fd = %d, unconnected)\n", newconn->fd); return newconn; } #if 0 /** * unsigned int aim_oft_listener_clean - close up old listeners * @sess: session to clean up in * @age: maximum age in seconds * * returns number closed, -1 on error. */ faim_export unsigned int aim_oft_listener_clean(aim_session_t *sess, time_t age) { aim_conn_t *cur; time_t now; unsigned int hit = 0; if (!sess) return -1; now = time(NULL); for(cur = sess->connlist;cur; cur = cur->next) if (cur->type == AIM_CONN_TYPE_RENDEZVOUS_OUT) { if (cur->lastactivity < (now - age) ) { aim_conn_close(cur); hit++; } } return hit; } #endif faim_export const char *aim_directim_getsn(aim_conn_t *conn) { struct aim_directim_intdata *intdata; if (!conn) return NULL; if ((conn->type != AIM_CONN_TYPE_RENDEZVOUS) || (conn->subtype != AIM_CONN_SUBTYPE_OFT_DIRECTIM)) return NULL; if (!conn->internal) return NULL; intdata = (struct aim_directim_intdata *)conn->internal; return intdata->sn; } /** * aim_directim_connect - connect to buddy for directim * @sess: the session to append the conn to, * @sn: the SN we're connecting to * @addr: address to connect to * * This is a wrapper for aim_newconn. * * If addr is NULL, the socket is not created, but the connection is * allocated and setup to connect. * */ faim_export aim_conn_t *aim_directim_connect(aim_session_t *sess, const char *sn, const char *addr, const fu8_t *cookie) { aim_conn_t *newconn; struct aim_directim_intdata *intdata; if (!sess || !sn) return NULL; if (!(intdata = malloc(sizeof(struct aim_directim_intdata)))) return NULL; memset(intdata, 0, sizeof(struct aim_directim_intdata)); memcpy(intdata->cookie, cookie, 8); strncpy(intdata->sn, sn, sizeof(intdata->sn)); if (addr) strncpy(intdata->ip, addr, sizeof(intdata->ip)); /* XXX verify that non-blocking connects actually work */ if (!(newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS, addr))) { free(intdata); return NULL; } if (!newconn) { free(intdata); return newconn; } newconn->subtype = AIM_CONN_SUBTYPE_OFT_DIRECTIM; newconn->internal = intdata; return newconn; } /** * aim_directim_getconn - find a directim conn for buddy name * @sess: your session, * @name: the name to get, * * returns conn for directim with name, %NULL if none found. * */ faim_export aim_conn_t *aim_directim_getconn(aim_session_t *sess, const char *name) { aim_conn_t *cur; if (!sess || !name || !strlen(name)) return NULL; for (cur = sess->connlist; cur; cur = cur->next) { struct aim_directim_intdata *intdata; if ((cur->type != AIM_CONN_TYPE_RENDEZVOUS) || (cur->subtype != AIM_CONN_SUBTYPE_OFT_DIRECTIM)) continue; intdata = cur->internal; if (aim_sncmp(intdata->sn, name) == 0) break; } return cur; } /** * aim_accepttransfer - accept a file transfer request * @sess: the session, * @conn: the BOS conn for the CAP reply * @sn: the screenname to send it to, * @cookie: the cookie used * @ip: the ip to connect to * @port: the port to use * @rendid: capability type (%AIM_CAPS_GETFILE or %AIM_CAPS_SENDFILE) * * @listingfiles: number of files to share * @listingtotsize: total size of shared files * @listingsize: length of the listing file(buffer) * @listingchecksum: checksum of the listing * * Returns new connection or %NULL on error. * * XXX this should take a struct. */ faim_export aim_conn_t *aim_accepttransfer(aim_session_t *sess, aim_conn_t *conn, const char *sn, const fu8_t *cookie, const fu8_t *ip, fu16_t port, fu16_t rendid, ...) { aim_frame_t *newpacket; aim_conn_t *newconn; struct aim_filetransfer_priv *priv; int i; char addr[21]; if (!sess || !conn || !sn || !cookie || !ip) { return NULL; } /* OSCAR CAP accept packet */ if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x0002, 10+8+2+1+strlen(sn)+4+2+8+16))) { return NULL; } aim_putsnac(&newpacket->data, 0x0004, 0x0006, 0x0000, sess->snacid_next); for (i = 0; i < 8; i++) aimbs_put8(&newpacket->data, cookie[i]); aimbs_put16(&newpacket->data, 0x0002); aimbs_put8(&newpacket->data, strlen(sn)); aimbs_putraw(&newpacket->data, sn, strlen(sn)); aimbs_put16(&newpacket->data, 0x0005); aimbs_put16(&newpacket->data, 0x001a); aimbs_put16(&newpacket->data, AIM_RENDEZVOUS_ACCEPT); for (i = 0; i < 8; i++) /* yes, again... */ aimbs_put8(&newpacket->data, cookie[i]); aim_putcap(&newpacket->data, rendid); aim_tx_enqueue(sess, newpacket); snprintf(addr, sizeof(addr), "%s:%d", ip, port); newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS, addr); if (newconn->status & AIM_CONN_STATUS_CONNERR) { return NULL; } if (!newconn || (newconn->fd == -1)) { perror("aim_newconn"); faimdprintf(sess, 2, "could not connect to %s (fd: %i)\n", ip, newconn?newconn->fd:0); return newconn; } priv = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv)); memcpy(priv->cookie, cookie, 8); priv->state = 0; strncpy(priv->sn, sn, MAXSNLEN); strncpy(priv->ip, ip, sizeof(priv->ip)); newconn->internal = (void *)priv; faimdprintf(sess, 2, "faim: connected to peer (fd = %d)\n", newconn->fd); if (rendid == AIM_CAPS_GETFILE) { return NULL; /* This should never happen for now. -- wtm */ #if 0 struct aim_fileheader_t *fh; aim_frame_t *newoft; aim_msgcookie_t *cachedcook; /* XXX take the following parameters fu16_t listingfiles, fu16_t listingtotsize, fu16_t listingsize, fu32_t listingchecksum, */ newconn->subtype = AIM_CONN_SUBTYPE_OFT_GETFILE; faimdprintf(sess, 2, "faim: getfile request accept\n"); if (!(newoft = aim_tx_new(sess, newconn, AIM_FRAMETYPE_OFT, 0x1108, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); /* XXX: conn leak here */ return NULL; } memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; if (!(fh = (struct aim_fileheader_t*)calloc(1, sizeof(struct aim_fileheader_t)))) { /* XXX: conn leak here */ perror("calloc"); return NULL; } fh->encrypt = 0x0000; fh->compress = 0x0000; fh->totfiles = listingfiles; fh->filesleft = listingfiles; /* is this right -- total parts and parts left?*/ fh->totparts = 0x0001; fh->partsleft = 0x0001; fh->totsize = listingtotsize; fh->size = listingsize; /* ls -l listing.txt */ fh->modtime = (int)time(NULL); /* we'll go with current time for now */ fh->checksum = listingchecksum; fh->rfcsum = 0x00000000; fh->rfsize = 0x00000000; fh->cretime = 0x00000000; fh->rfcsum = 0x00000000; fh->nrecvd = 0x00000000; fh->recvcsum = 0x00000000; memset(fh->idstring, 0, sizeof(fh->idstring)); strncpy(fh->idstring, "OFT_Windows ICBMFT V1.1 32", sizeof(fh->idstring)); fh->flags = 0x02; fh->lnameoffset = 0x1a; fh->lsizeoffset = 0x10; memset(fh->dummy, 0, sizeof(fh->dummy)); memset(fh->macfileinfo, 0, sizeof(fh->macfileinfo)); /* we need to figure out these encodings for filenames */ fh->nencode = 0x0000; fh->nlanguage = 0x0000; memset(fh->name, 0, sizeof(fh->name)); strncpy(fh->name, "listing.txt", sizeof(fh->name)); if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) { aim_frame_destroy(newoft); /* XXX: conn leak */ perror("calloc (1)"); return NULL; } memcpy(fh->bcookie, cookie, 8); if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, fh))) faimdprintf(sess, 1, "eek, bh fail!\n"); aim_tx_enqueue(sess, newoft); if (!(cachedcook = (aim_msgcookie_t *)calloc(1, sizeof(aim_msgcookie_t)))) { faimdprintf(sess, 1, "faim: accepttransfer: couldn't calloc cachedcook. yeep!\n"); /* XXX: more cleanup, conn leak */ perror("calloc (2)"); return NULL; } memcpy(&(priv->fh), fh, sizeof(struct aim_fileheader_t)); memcpy(cachedcook->cookie, cookie, 8); cachedcook->type = AIM_COOKIETYPE_OFTGET; /* XXX doesn't priv need to be copied so we don't * double free? -- wtm */ cachedcook->data = (void *)priv; if (aim_cachecookie(sess, cachedcook) == -1) faimdprintf(sess, 1, "faim: ERROR caching message cookie\n"); free(fh); #endif } else if (rendid == AIM_CAPS_SENDFILE) { newconn->subtype = AIM_CONN_SUBTYPE_OFT_SENDFILE; priv->fh.recvcsum = 0xffff0000; } else { return NULL; } return newconn; } /* conn is a BOS connection over which to send the cancel msg */ faim_export int aim_canceltransfer(aim_session_t *sess, aim_conn_t *conn, const char *cookie, const char *sn, int rendid) { aim_frame_t *newpacket; int i; if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x0002, 10+8+2+1+strlen(sn)+4+2+8+16))) { return 1; } aim_putsnac(&newpacket->data, 0x0004, 0x0006, 0x0000, sess->snacid_next); for (i = 0; i < 8; i++) aimbs_put8(&newpacket->data, cookie[i]); aimbs_put16(&newpacket->data, 0x0002); aimbs_put8(&newpacket->data, strlen(sn)); aimbs_putraw(&newpacket->data, sn, strlen(sn)); aimbs_put16(&newpacket->data, 0x0005); aimbs_put16(&newpacket->data, 0x001a); aimbs_put16(&newpacket->data, AIM_RENDEZVOUS_CANCEL); for (i = 0; i < 8; i++) aimbs_put8(&newpacket->data, cookie[i]); aim_putcap(&newpacket->data, rendid); aim_tx_enqueue(sess, newpacket); return 0; } /** * aim_getlisting(FILE *file) -- get an aim_fileheader_t for a given FILE* * @file is an opened listing file * * returns a pointer to the filled-in fileheader_t * * Currently omits checksum. we'll fix this when AOL breaks us, i * guess. * */ faim_export struct aim_fileheader_t *aim_getlisting(aim_session_t *sess, FILE *file) { return NULL; #if 0 struct aim_fileheader_t *fh; u_long totsize = 0, size = 0, checksum = 0xffff0000; short totfiles = 0; char *linebuf, sizebuf[9]; int linelength = 1024; /* XXX: if we have a line longer than 1024chars, God help us. */ if ((linebuf = (char *)calloc(1, linelength)) == NULL ) { faimdprintf(sess, 2, "linebuf calloc failed\n"); return NULL; } if (fseek(file, 0, SEEK_END) == -1) { /* use this for sanity check */ perror("getlisting END1 fseek:"); faimdprintf(sess, 2, "getlising fseek END1 error\n"); } if ((size = ftell(file)) == -1) { perror("getlisting END1 getpos:"); faimdprintf(sess, 2, "getlising getpos END1 error\n"); } if (fseek(file, 0, SEEK_SET) != 0) { perror("getlesting fseek(SET):"); faimdprintf(sess, 2, "faim: getlisting: couldn't seek to beginning of listing file\n"); } memset(linebuf, 0, linelength); size = 0; while(fgets(linebuf, linelength, file)) { totfiles++; memset(sizebuf, 0, 9); size += strlen(linebuf); if (strlen(linebuf) < 23) { faimdprintf(sess, 2, "line \"%s\" too short. skipping\n", linebuf); continue; } if (linebuf[strlen(linebuf)-1] != '\n') { faimdprintf(sess, 2, "faim: OFT: getlisting -- hit EOF or line too long!\n"); } memcpy(sizebuf, linebuf+17, 8); totsize += strtol(sizebuf, NULL, 10); memset(linebuf, 0, linelength); } if (fseek(file, 0, SEEK_SET) == -1) { perror("getlisting END2 fseek:"); faimdprintf(sess, 2, "getlising fseek END2 error\n"); } free(linebuf); /* we're going to ignore checksumming the data for now -- that * requires walking the whole listing.txt. it should probably be * done at register time and cached, but, eh. */ if (!(fh = (struct aim_fileheader_t*)calloc(1, sizeof(struct aim_fileheader_t)))) return NULL; fh->encrypt = 0x0000; fh->compress = 0x0000; fh->totfiles = totfiles; fh->filesleft = totfiles; /* is this right? */ fh->totparts = 0x0001; fh->partsleft = 0x0001; fh->totsize = totsize; fh->size = size; /* ls -l listing.txt */ fh->modtime = (int)time(NULL); /* we'll go with current time for now */ fh->checksum = checksum; /* XXX: checksum ! */ fh->rfcsum = 0x00000000; fh->rfsize = 0x00000000; fh->cretime = 0x00000000; fh->rfcsum = 0x00000000; fh->nrecvd = 0x00000000; fh->recvcsum = 0x00000000; /* memset(fh->idstring, 0, sizeof(fh->idstring)); */ memcpy(fh->idstring, "OFT_Windows ICBMFT V1.1 32", sizeof(fh->idstring)); memset(fh->idstring+strlen(fh->idstring), 0, sizeof(fh->idstring)-strlen(fh->idstring)); fh->flags = 0x02; fh->lnameoffset = 0x1a; fh->lsizeoffset = 0x10; /* memset(fh->dummy, 0, sizeof(fh->dummy)); */ memset(fh->macfileinfo, 0, sizeof(fh->macfileinfo)); fh->nencode = 0x0000; /* we need to figure out these encodings for filenames */ fh->nlanguage = 0x0000; /* memset(fh->name, 0, sizeof(fh->name)); */ strncpy(fh->name, "listing.txt", sizeof(fh->name)); memset(fh->name+strlen(fh->name), 0, 64-strlen(fh->name)); faimdprintf(sess, 2, "faim: OFT: listing fh name %s / %s\n", fh->name, (fh->name+(strlen(fh->name)))); return fh; #endif } /** * aim_listenestablish - create a listening socket on a port. * @portnum: the port number to bind to. * * you need to call accept() when it's connected. returns your fd * * XXX: give the client author the responsibility of setting up a * listener, then we no longer have a libfaim problem with broken * solaris *innocent smile* -jbm */ static int listenestablish(fu16_t portnum) { #if HAVE_GETADDRINFO int listenfd; const int on = 1; struct addrinfo hints, *res, *ressave; char serv[5]; snprintf(serv, sizeof(serv), "%d", portnum); memset(&hints, 0, sizeof(struct addrinfo)); hints.ai_flags = AI_PASSIVE; hints.ai_family = AF_UNSPEC; hints.ai_socktype = SOCK_STREAM; if (getaddrinfo(NULL /*any IP*/, serv, &hints, &res) != 0) { perror("getaddrinfo"); return -1; } ressave = res; do { listenfd = socket(res->ai_family, res->ai_socktype, res->ai_protocol); if (listenfd < 0) continue; setsockopt(listenfd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on)); if (bind(listenfd, res->ai_addr, res->ai_addrlen) == 0) break; /* success */ close(listenfd); } while ( (res = res->ai_next) ); if (!res) return -1; if (listen(listenfd, 1024)!=0) { perror("listen"); return -1; } fcntl(listenfd, F_SETFL, O_NONBLOCK); freeaddrinfo(ressave); return listenfd; #else int listenfd; const int on = 1; struct sockaddr_in sockin; if ((listenfd = socket(AF_INET, SOCK_STREAM, 0)) < 0) { perror("socket(listenfd)"); return -1; } if (setsockopt(listenfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on)) != 0) { perror("setsockopt(listenfd)"); close(listenfd); return -1; } memset(&sockin, 0, sizeof(struct sockaddr_in)); sockin.sin_family = AF_INET; sockin.sin_port = htons(portnum); if (bind(listenfd, (struct sockaddr *)&sockin, sizeof(struct sockaddr_in)) != 0) { perror("bind(listenfd)"); close(listenfd); return -1; } if (listen(listenfd, 4) != 0) { perror("listen(listenfd)"); close(listenfd); return -1; } fcntl(listenfd, F_SETFL, O_NONBLOCK); return listenfd; #endif } static int getcommand_getfile(aim_session_t *sess, aim_conn_t *conn) { #if 0 struct aim_filetransfer_priv *ft; aim_rxcallback_t userfunc; ft = conn->priv; if (ft->state == 2) { /* waiting on listing data */ int ret = 0; char *listing; aim_frame_t *newoft; if (!(listing = malloc(ft->fh.size))) return -1; ft->state = 0; if (aim_recv(conn->fd, listing, ft->fh.size) != ft->fh.size) faimdprintf(sess, 2, "OFT get: file %s was short. (0x%lx)\n", ft->fh.name, ft->fh.size); if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x120b, 0))) { faimdprintf(sess, 2, "faim: aim_get_command_rendezvous: getfile listing: tx_new OFT failed\n"); free(listing); aim_conn_close(conn); return -1; } memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; /* Protocol BS - set nrecvd to size of listing, recvcsum to listing checksum, flags to 0 */ ft->fh.nrecvd = ft->fh.size; ft->fh.recvcsum = ft->fh.checksum; ft->fh.flags = 0; if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) { aim_frame_destroy(newoft); free(listing); return -1; } if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) faimdprintf(sess, 2, "eek! bh fail listing\n"); /* send the 120b */ aim_tx_enqueue(sess, newoft); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTING)) ) ret = userfunc(sess, NULL, conn, ft, listing); free(listing); return ret; } if (ft->state == 3) { /* waiting on file data */ if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILERECEIVE)) ) return userfunc(sess, NULL, conn, ft->fh.name, ft->fh.size); return 0; } if (ft->state == 4) { if( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILESTATE4)) ) return userfunc(sess, NULL, conn); aim_conn_close(conn); return 0; } return 0; #else return -1; #endif } static void connclose_sendfile(aim_session_t *sess, aim_conn_t *conn) { aim_msgcookie_t *cook; struct aim_filetransfer_priv *priv = (struct aim_filetransfer_priv *)conn->internal; cook = aim_uncachecookie(sess, priv->cookie, AIM_COOKIETYPE_OFTSEND); aim_cookie_free(sess, cook); return; } static void connkill_sendfile(aim_session_t *sess, aim_conn_t *conn) { free(conn->internal); return; } static void connclose_getfile(aim_session_t *sess, aim_conn_t *conn) { #if 0 aim_msgcookie_t *cook; struct aim_filetransfer_priv *priv = (struct aim_filetransfer_priv *)conn->priv; cook = aim_uncachecookie(sess, priv->cookie, AIM_COOKIETYPE_OFTGET); aim_cookie_free(sess, cook); #endif return; } static void connkill_getfile(aim_session_t *sess, aim_conn_t *conn) { free(conn->internal); return; } static void connclose_directim(aim_session_t *sess, aim_conn_t *conn) { struct aim_directim_intdata *intdata = (struct aim_directim_intdata *)conn->internal; aim_msgcookie_t *cook; cook = aim_uncachecookie(sess, intdata->cookie, AIM_COOKIETYPE_OFTIM); aim_cookie_free(sess, cook); return; } static void connkill_directim(aim_session_t *sess, aim_conn_t *conn) { free(conn->internal); return; } faim_internal void aim_conn_close_rend(aim_session_t *sess, aim_conn_t *conn) { if (conn->type != AIM_CONN_TYPE_RENDEZVOUS) return; if (conn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE) connclose_sendfile(sess, conn); else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) connclose_getfile(sess, conn); else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM) connclose_directim(sess, conn); return; } faim_internal void aim_conn_kill_rend(aim_session_t *sess, aim_conn_t *conn) { if (conn->type != AIM_CONN_TYPE_RENDEZVOUS) return; if (conn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE) connkill_sendfile(sess, conn); else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) connkill_getfile(sess, conn); else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM) connkill_directim(sess, conn); return; } static int handlehdr_directim(aim_session_t *sess, aim_conn_t *conn, aim_bstream_t *bs) { aim_frame_t fr; aim_rxcallback_t userfunc; fu32_t payloadlength; fu16_t flags, encoding; char *snptr = NULL; fr.conn = conn; /* XXX ugly */ aim_bstream_setpos(bs, 20); payloadlength = aimbs_get32(bs); aim_bstream_setpos(bs, 24); encoding = aimbs_get16(bs); aim_bstream_setpos(bs, 30); flags = aimbs_get16(bs); aim_bstream_setpos(bs, 36); /* XXX -create an aimbs_getnullstr function? */ snptr = aimbs_getstr(bs, MAXSNLEN); faimdprintf(sess, 2, "faim: OFT frame: handlehdr_directim: %04x / %04x / %s\n", payloadlength, flags, snptr); if (flags & 0x0002) { int ret = 0; if (flags & 0x000c) { if ((userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMTYPING))) ret = userfunc(sess, &fr, snptr, 1); return ret; } if ((userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMTYPING))) ret = userfunc(sess, &fr, snptr, 0); return ret; } else if (((flags & 0x000f) == 0x0000) && payloadlength) { char *msg, *msg2; int ret = 0; int recvd = 0; int i; if (!(msg = calloc(1, payloadlength+1))) return -1; msg2 = msg; while (payloadlength - recvd) { if (payloadlength - recvd >= 1024) i = aim_recv(conn->fd, msg2, 1024); else i = aim_recv(conn->fd, msg2, payloadlength - recvd); if (i <= 0) { free(msg); return -1; } recvd = recvd + i; msg2 = msg2 + i; if ((userfunc=aim_callhandler(sess, conn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_IMAGETRANSFER))) userfunc(sess, &fr, snptr, (double)recvd / payloadlength); } if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINCOMING)) ) ret = userfunc(sess, &fr, snptr, msg, payloadlength, encoding); free(msg); return ret; } return 0; } static int handlehdr_getfile_listing(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_filetransfer_priv *ft; struct aim_fileheader_t *fh; struct aim_msgcookie_t *cook; aim_frame_t *newoft; aim_rxcallback_t userfunc; faimdprintf(sess, 2,"faim: rend: fileget 0x1108\n"); fh = aim_oft_getfh(hdr); faim_mutex_unlock(&conn->active); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) { free(fh); return -1; } ft = cook->data; /* we're waaaaiiiting.. for listing.txt */ ft->state = 2; memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t)); free(fh); if(aim_cachecookie(sess, cook) == -1) { faimdprintf(sess, 1, "error caching cookie\n"); return -1; } if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x1209, 0))) { aim_conn_close(conn); return -1; } memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) { newoft->lock = 0; aim_frame_destroy(newoft); return -1; } if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) { newoft->lock = 0; aim_frame_destroy(newoft); return -1; } newoft->lock = 0; aim_tx_enqueue(sess, newoft); #endif return -1; } static int handlehdr_getfile_listing2(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_filetransfer_priv *ft; struct aim_fileheader_t *fh; struct aim_msgcookie_t *cook; int ret = 0; aim_rxcallback_t userfunc; fh = aim_oft_getfh(hdr); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) faimdprintf(sess, 2, "shit, no cookie in 0x1209. (%i/%s)going to crash..\n", AIM_COOKIETYPE_OFTGET, fh->bcookie); ft = cook->data; if (ft->fh.size != fh->size) faimdprintf(sess, 2, "hrm. ft->fh.size (%ld) != fh->size (%ld). um. using ft->fh.size\n", ft->fh.size, fh->size); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGREQ))) ret = userfunc(sess, NULL, conn, fh); faimdprintf(sess, 2, "faim: get_command_rendezvous: hit end of 1209\n"); free(fh); return ret; #else return -1; #endif } static int handlehdr_getfile_listing3(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_filetransfer_priv *ft; struct aim_msgcookie_t *cook; struct aim_fileheader_t *fh; aim_rxcallback_t userfunc; fh = aim_oft_getfh(hdr); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) { free(fh); return -1; } free(fh); ft = cook->data; if (aim_cachecookie(sess, cook) == -1) return -1; if ((userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGRXCONFIRM))) return userfunc(sess, NULL, conn); #endif return -1; } static int handlehdr_getfile_request(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_filetransfer_priv *ft; aim_msgcookie_t *cook; struct aim_fileheader_t *fh; aim_frame_t *newoft; int i = 0; aim_rxcallback_t userfunc; fh = aim_oft_getfh(hdr); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) { free(fh); return -1; } ft = cook->data; memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t)); free(fh); aim_cachecookie(sess, cook); faimdprintf(sess, 2, "faim: fileget: %s seems to want %s\n", ft->sn, ft->fh.name); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ)) ) i = userfunc(sess, NULL, conn, &(ft->fh), cook->cookie); if (i < 0) return i; if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0101, 0))) { faimdprintf(sess, 2, "faim: send_final_transfer: tx_new OFT failed\n"); return -1; } memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; if (!(newoft->hdr.oft.hdr2 = calloc(1,newoft->hdr.oft.hdr2len))) { aim_frame_destroy(newoft); return -1; } /* protocol BS: nrecvd, recvcsum to 0, flags to 0x20. */ ft->fh.nrecvd = 0; ft->fh.recvcsum = 0; ft->fh.flags = 0x20; aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)); aim_tx_enqueue(sess, newoft); faimdprintf(sess, 2, "faim: OFT: OFT file header enqueued.\n"); return i; #else return -1; #endif } static int handlehdr_getfile_sending(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_fileheader_t *fh; struct aim_filetransfer_priv *ft; struct aim_msgcookie_t *cook; struct command_tx_struct *newoft; aim_rxcallback_t userfunc; fh = aim_oft_getfh(hdr); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) { free(fh); return -1; } free(fh); ft = cook->data; ft->state = 3; if (aim_cachecookie(sess, cook) == -1) return -1; faimdprintf(sess, 2, "faim: fileget: %s seems to want to send %s\n", ft->sn, ft->fh.name); if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0202, 0))) { faimdprintf(sess, 2, "faim: send_final_transfer: tx_new OFT failed\n"); return -1; } newoft->lock = 1; memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; if (!(newoft->hdr.oft.hdr2 = calloc(1,newoft->hdr.oft.hdr2len))) { aim_frame_destroy(newoft); return -1; } aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)); newoft->lock = 0; aim_tx_enqueue(sess, newoft); faimdprintf(sess, 2, "faim: OFT: OFT 0x0202 enqueued.\n"); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ)) == NULL) return 1; #else return -1; #endif } /* We are receiving a file, and the buddy sent us this header describing * it. We send back a similar header to confirm, then we're ready to * start reading the raw data. */ static int handlehdr_sendfile_sending(aim_session_t *sess, aim_conn_t *conn, aim_bstream_t *bs) { struct aim_filetransfer_priv *ft; struct aim_fileheader_t *fh; aim_frame_t *newoft; aim_rxcallback_t userfunc; fh = aim_oft_getfh(bs); /* We receive a null cookie for the first file; we must fill * it in to authenticate ourselves. -- wtm */ ft = conn->internal; memcpy(&(fh->bcookie), ft->cookie, 8); memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t)); free(fh); if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, AIM_OFT_PROTO_ACCEPT, 0))) { faimdprintf(sess, 2, "faim: send_final_transfer: tx_new OFT failed\n"); return -1; } if (aim_oft_buildheader(&(newoft->data), &(ft->fh)) == -1) { return -1; } memcpy(newoft->hdr.rend.magic, "OFT2", 4); newoft->hdr.rend.hdrlen = aim_bstream_curpos(&newoft->data); aim_tx_enqueue(sess, newoft); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_SENDFILEFILEREQ)) == NULL) return 1; { char *cur; /* Convert the directory separator: it is sent * as ^A (0x01). */ while ((cur = strchr(ft->fh.name, 0x01))) { *cur = G_DIR_SEPARATOR; } } return userfunc(sess, NULL, conn, &(ft->fh)); } /* * These were originally described by Josh Myer: * http://www.geocrawler.com/archives/3/896/2000/9/0/4291064/ * XXX this doesn't actually work yet * -- wtm */ static int handlehdr_sendfile_resume(aim_session_t *sess, aim_conn_t *conn, aim_bstream_t *bs) { aim_frame_t *newoft; aim_msgcookie_t *cook; struct aim_fileheader_t *fh; struct aim_filetransfer_priv *ft; fh = aim_oft_getfh(bs); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTSEND))) { free(fh); return -1; } ft = (struct aim_filetransfer_priv *)cook->data; ft->fh.nrecvd = fh->nrecvd; ft->fh.recvcsum = fh->recvcsum; strncpy(ft->fh.name, fh->name, sizeof(ft->fh.name)); if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0106, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); free(fh); return -1; } if (aim_oft_buildheader(&(newoft->data), &(ft->fh)) == -1) { aim_frame_destroy(newoft); free(fh); return -1; } memcpy(newoft->hdr.rend.magic, "OFT2", 4); newoft->hdr.rend.hdrlen = aim_bstream_curpos(&newoft->data); aim_tx_enqueue(sess, newoft); free(fh); return 0; } /* We are sending a file, and the buddy sent us this header indicating * that he or she is ready for the raw data. */ static int handlehdr_sendfile_recv(aim_session_t *sess, aim_conn_t *conn, aim_bstream_t *bs) { struct aim_fileheader_t *fh; aim_msgcookie_t *cook; int ret = 1; struct aim_filetransfer_priv *ft; aim_rxcallback_t userfunc; fh = aim_oft_getfh(bs); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTSEND))) { free(fh); return -1; } ft = (struct aim_filetransfer_priv *)cook->data; if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_SENDFILEFILESEND)) ) ret = userfunc(sess, NULL, conn, &(ft->fh)); free(fh); return ret; } static int handlehdr_getfile_recv(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_fileheader_t *fh; struct aim_msgcookie_t *cook; int ret = 1; aim_rxcallback_t userfunc; struct aim_filetransfer_priv *ft; fh = aim_oft_getfh(hdr); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) { free(fh); return -1; } ft = cook->data; faimdprintf(sess, 2, "faim: get_rend: looks like we're ready to send data.(oft 0x0202)\n"); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILESEND)) ) ret = userfunc(sess, NULL, conn, fh); free(fh); return ret; #else return -1; #endif } /* We just sent the raw data of a file, and the buddy sent us back this * header indicating that the transfer is complete. */ static int handlehdr_sendfile_finish(aim_session_t *sess, aim_conn_t *conn, aim_bstream_t *bs) { struct aim_fileheader_t *fh; aim_msgcookie_t *cook; aim_rxcallback_t userfunc; fh = aim_oft_getfh(bs); if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTSEND))) { free(fh); return -1; } if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_SENDFILECOMPLETE)) ) userfunc(sess, NULL, conn, fh->bcookie); free(fh); return 0; } static int handlehdr_getfile_finish(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr) { #if 0 struct aim_fileheader_t *fh; aim_rxcallback_t userfunc; fh = aim_oft_getfh(hdr); faimdprintf(sess, 2, "faim: get_rend: looks like we're done with a transfer (oft 0x0204)\n"); if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILECOMPLETE)) ) userfunc(sess, NULL, conn, fh); free(fh); #endif return -1; } faim_internal int aim_rxdispatch_rendezvous(aim_session_t *sess, aim_frame_t *fr) { aim_conn_t *conn = fr->conn; aim_bstream_t *bs = &fr->data; int ret = -1; if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) { /* This should never happen. -- wtm */ return getcommand_getfile(sess, conn); } else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE) { switch(fr->hdr.rend.type) { case AIM_OFT_PROTO_OFFER: ret = handlehdr_sendfile_sending(sess, conn, bs); break; case AIM_OFT_PROTO_RESUME: ret = handlehdr_sendfile_resume(sess, conn, bs); break; case AIM_OFT_PROTO_RESUMEACCEPT: /* like _ACCEPT */; case AIM_OFT_PROTO_ACCEPT: ret = handlehdr_sendfile_recv(sess, conn, bs); break; case AIM_OFT_PROTO_ACK: ret = handlehdr_sendfile_finish(sess, conn, bs); break; default: faimdprintf(sess, 2, "faim: OFT frame: uknown type %04x\n", fr->hdr.rend.type); ret = -1; break; } } else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM) { if (fr->hdr.rend.type == 0x0001) ret = handlehdr_directim(sess, conn, bs); else faimdprintf(sess, 0, "faim: DIM frame: unknown type %04x\n", fr->hdr.rend.type); } else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) { /* This _really_ shouldn't happen. :) -- wtm */ char *hdr = NULL; int hdrtype = fr->hdr.rend.type; if (hdrtype == 0x1108) /* getfile listing.txt incoming tx->rx */ ret = handlehdr_getfile_listing(sess, conn, hdr); else if (hdrtype == 0x1209) /* get file listing ack rx->tx */ ret = handlehdr_getfile_listing2(sess, conn, hdr); else if (hdrtype == 0x120b) /* get file listing rx confirm */ ret = handlehdr_getfile_listing3(sess, conn, hdr); else if (hdrtype == 0x120c) /* getfile request */ ret = handlehdr_getfile_request(sess, conn, hdr); else if (hdrtype == 0x0101) /* getfile sending data */ ret = handlehdr_getfile_sending(sess, conn, hdr); else if (hdrtype == 0x0202) /* getfile recv data */ ret = handlehdr_getfile_recv(sess, conn, hdr); else if (hdrtype == 0x0204) /* getfile finished */ ret = handlehdr_getfile_finish(sess, conn, hdr); else { faimdprintf(sess, 2,"faim: OFT frame: uknown type %04x\n", hdrtype); ret = -1; } } if (ret == -1) aim_conn_close(conn); return ret; } /** * aim_oft_getfh - extracts an &aim_fileheader_t from buffer hdr. * @bs: bstream to extract header from * * returns pointer to new struct on success; %NULL on error. * */ static struct aim_fileheader_t *aim_oft_getfh(aim_bstream_t *bs) { struct aim_fileheader_t *fh; if (!(fh = calloc(1, sizeof(struct aim_fileheader_t)))) return NULL; /* The bstream should be positioned after the hdrtype. */ aimbs_getrawbuf(bs, fh->bcookie, 8); fh->encrypt = aimbs_get16(bs); fh->compress = aimbs_get16(bs); fh->totfiles = aimbs_get16(bs); fh->filesleft = aimbs_get16(bs); fh->totparts = aimbs_get16(bs); fh->partsleft = aimbs_get16(bs); fh->totsize = aimbs_get32(bs); fh->size = aimbs_get32(bs); fh->modtime = aimbs_get32(bs); fh->checksum = aimbs_get32(bs); fh->rfrcsum = aimbs_get32(bs); fh->rfsize = aimbs_get32(bs); fh->cretime = aimbs_get32(bs); fh->rfcsum = aimbs_get32(bs); fh->nrecvd = aimbs_get32(bs); fh->recvcsum = aimbs_get32(bs); aimbs_getrawbuf(bs, fh->idstring, 32); fh->flags = aimbs_get8(bs); fh->lnameoffset = aimbs_get8(bs); fh->lsizeoffset = aimbs_get8(bs); aimbs_getrawbuf(bs, fh->dummy, 69); aimbs_getrawbuf(bs, fh->macfileinfo, 16); fh->nencode = aimbs_get16(bs); fh->nlanguage = aimbs_get16(bs); aimbs_getrawbuf(bs, fh->name, 64); /* XXX */ return fh; } /** * aim_oft_checksum - calculate oft checksum of buffer * @buffer: buffer of data to checksum * @bufsize: size of buffer * @prevcheck: previous checksum * * Prevcheck should be 0xFFFF0000 for each new file; you can have this * checksum chunks of files in series if you just call it repeatedly in a * for(; ; ) loop and don't reset the checksum between each call. And you * thought we didn't care about you and your pathetic client's meomry * footprint ;^) * * Thanks to Graham Booker for providing this improved checksum * routine, which is simpler and should be more accurate than Josh * Myer's original code. -- wtm * * This algorithim works every time I have tried it. The other fails * sometimes. So, AOL who thought this up? It has got to be the weirdest * checksum I have ever seen. */ faim_export fu32_t aim_oft_checksum(const unsigned char *buffer, int bufferlen, int prevcheck) { fu32_t check = (prevcheck >> 16) & 0xffff, oldcheck; int i; unsigned short val; for (i=0; i<bufferlen; i++) { oldcheck = check; if (i&1) { val = buffer[i]; } else { val = buffer[i] << 8; } check -= val; /* The follownig appears to be necessary.... It happens every once in a while and the checksum doesn't fail. */ if (check > oldcheck) { check--; } } check = ((check & 0x0000ffff) + (check >> 16)); check = ((check & 0x0000ffff) + (check >> 16)); return check << 16; } faim_export fu32_t aim_update_checksum(aim_session_t *sess, aim_conn_t *conn, const unsigned char *buffer, int len) { struct aim_filetransfer_priv *ft = conn->internal; ft->fh.nrecvd += len; ft->fh.recvcsum = aim_oft_checksum(buffer, len, ft->fh.recvcsum); return 0; } /** * aim_oft_buildheader - fills a buffer with network-order fh data * @bs: bstream to fill -- automatically initialized * @fh: fh to get data from * * returns -1 on error. * */ static int aim_oft_buildheader(aim_bstream_t *bs, struct aim_fileheader_t *fh) { fu8_t *hdr; if (!bs || !fh) return -1; if (!(hdr = (unsigned char *)calloc(1, 0x100 - 8))) { return -1; } aim_bstream_init(bs, hdr, 0x100 - 8); aimbs_putraw(bs, fh->bcookie, 8); aimbs_put16(bs, fh->encrypt); aimbs_put16(bs, fh->compress); aimbs_put16(bs, fh->totfiles); aimbs_put16(bs, fh->filesleft); aimbs_put16(bs, fh->totparts); aimbs_put16(bs, fh->partsleft); aimbs_put32(bs, fh->totsize); aimbs_put32(bs, fh->size); aimbs_put32(bs, fh->modtime); aimbs_put32(bs, fh->checksum); aimbs_put32(bs, fh->rfrcsum); aimbs_put32(bs, fh->rfsize); aimbs_put32(bs, fh->cretime); aimbs_put32(bs, fh->rfcsum); aimbs_put32(bs, fh->nrecvd); aimbs_put32(bs, fh->recvcsum); aimbs_putraw(bs, fh->idstring, 32); aimbs_put8(bs, fh->flags); aimbs_put8(bs, fh->lnameoffset); aimbs_put8(bs, fh->lsizeoffset); aimbs_putraw(bs, fh->dummy, 69); aimbs_putraw(bs, fh->macfileinfo, 16); aimbs_put16(bs, fh->nencode); aimbs_put16(bs, fh->nlanguage); aimbs_putraw(bs, fh->name, 64); /* XXX: Filenames longer than 64B */ return 0; } /** * aim_getfile_intitiate - Request an OFT getfile session * @sess: your session, * @conn: the BOS conn, * @destsn is the SN to connect to. * * returns a new &aim_conn_t on success, %NULL on error */ faim_export aim_conn_t *aim_getfile_initiate(aim_session_t *sess, aim_conn_t *conn, const char *destsn) { return NULL; #if 0 struct command_tx_struct *newpacket; struct aim_conn_t *newconn; struct aim_filetransfer_priv *priv; struct aim_msgcookie_t *cookie; int curbyte, i, listenfd; short port = 4443; struct hostent *hptr; struct utsname myname; char cap[16]; char d[4]; /* Open our socket */ if ( (listenfd = aim_listenestablish(port)) == -1) return NULL; /* get our local IP */ if (uname(&myname) < 0) return NULL; if ( (hptr = gethostbyname(myname.nodename)) == NULL) return NULL; memcpy(&d, hptr->h_addr_list[0], 4); aim_putcap(cap, 16, AIM_CAPS_GETFILE); /* create the OSCAR packet */ if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+8+2+1+strlen(destsn)+4+4+0x42))) return NULL; newpacket->lock = 1; /* lock struct */ curbyte = 0; curbyte += aim_putsnac(newpacket->data+curbyte, 0x0004, 0x0006, 0x0000, sess->snac_nextid); /* XXX: check the cookie before commiting to using it */ /* Generate a random message cookie * This cookie needs to be alphanumeric and NULL-terminated to be TOC-compatible. */ for (i=0; i<7; i++) curbyte += aimutil_put8(newpacket->data+curbyte, 0x30 + ((u_char) random() % 10)); curbyte += aimutil_put8(newpacket->data+curbyte, 0x00); /* grab all the data for cookie caching. */ if (!(cookie = (struct aim_msgcookie_t *)calloc(1, sizeof(struct aim_msgcookie_t)))) return NULL; memcpy(cookie->cookie, newpacket->data+curbyte-8, 8); cookie->type = AIM_COOKIETYPE_OFTGET; if (!(priv = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv)))) return NULL; memcpy(priv->cookie, cookie, 8); memcpy(priv->sn, destsn, sizeof(priv->sn)); memcpy(priv->fh.name, "listing.txt", strlen("listing.txt")); priv->state = 1; cookie->data = priv; aim_cachecookie(sess, cookie); /* Channel ID */ curbyte += aimutil_put16(newpacket->data+curbyte,0x0002); /* 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_put16(newpacket->data+curbyte, 0x0003); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000); /* enTLV start */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0005); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0042); /* Flag data / ICBM Parameters? */ curbyte += aimutil_put8(newpacket->data+curbyte, 0x00); curbyte += aimutil_put8(newpacket->data+curbyte, 0x00); /* Cookie */ curbyte += aimutil_putstr(newpacket->data+curbyte, (char *)cookie, 8); /* Capability String */ curbyte += aimutil_putstr(newpacket->data+curbyte, (char *)cap, 0x10); /* 000a/0002 : 0001 */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x000a); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0001); /* 0003/0004: IP address */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0003); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0004); for (i = 0; i < 4; i++) curbyte += aimutil_put8(newpacket->data+curbyte, d[i]); /* already in network byte order */ /* 0005/0002: Port */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x0005); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002); curbyte += aimutil_put16(newpacket->data+curbyte, port); /* 000f/0000: ?? */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x000f); curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000); /* 2711/000c: ?? */ curbyte += aimutil_put16(newpacket->data+curbyte, 0x2711); curbyte += aimutil_put16(newpacket->data+curbyte, 0x000c); curbyte += aimutil_put32(newpacket->data+curbyte, 0x00120001); for (i = 0; i < 0x000c - 4; i++) curbyte += aimutil_put8(newpacket->data+curbyte, 0x00); newpacket->commandlen = curbyte; newpacket->lock = 0; aim_tx_enqueue(sess, newpacket); /* allocate and set up our connection */ i = fcntl(listenfd, F_GETFL, 0); fcntl(listenfd, F_SETFL, i | O_NONBLOCK); newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS_OUT, NULL); if (!newconn){ perror("aim_newconn"); return NULL; } newconn->fd = listenfd; newconn->subtype = AIM_CONN_SUBTYPE_OFT_GETFILE; newconn->internal = priv; faimdprintf(sess, 2,"faim: listening (fd = %d, unconnected)\n", newconn->fd); return newconn; #endif } /** * aim_oft_getfile_request - request a particular file over an established getfile connection * @sess: your session * @conn: the established OFT getfile connection * @name: filename to request * @size: size of the file * * * returns -1 on error, 0 on successful enqueuing */ #if 0 faim_export int aim_oft_getfile_request(aim_session_t *sess, aim_conn_t *conn, const char *name, int size) { aim_frame_t *newoft; struct aim_filetransfer_priv *ft; if (!sess || !conn || !conn->priv || !name) return -1; if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x120c, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); return -1; } memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100 - 8; ft = (struct aim_filetransfer_priv *)conn->priv; ft->fh.filesleft = 1; ft->fh.totfiles = 1; ft->fh.totparts = 1; ft->fh.partsleft = 1; ft->fh.totsize = size; ft->fh.size = size; ft->fh.checksum = 0; memcpy(ft->fh.name, name, strlen(name)); memset(ft->fh.name+strlen(name), 0, 1); if (!(newoft->hdr.oft.hdr2 = (unsigned char *)calloc(1,newoft->hdr.oft.hdr2len))) { aim_frame_destroy(newoft); return -1; } if (!(aim_oft_buildheader(newoft->hdr.oft.hdr2, &(ft->fh)))) { aim_frame_destroy(newoft); return -1; } aim_tx_enqueue(sess, newoft); return 0; } #endif /* Identify a file that we are about to send by transmitting the * appropriate header. */ faim_export int aim_oft_sendfile_request(aim_session_t *sess, aim_conn_t *conn, const char *filename, int filesdone, int numfiles, int size, int totsize) { aim_frame_t *newoft; aim_msgcookie_t *cook; struct aim_filetransfer_priv *ft = (struct aim_filetransfer_priv *)conn->internal; struct aim_fileheader_t *fh; if (!sess || !conn || !filename) return -1; if (!(fh = (struct aim_fileheader_t*)calloc(1, sizeof(struct aim_fileheader_t)))) return -1; #ifdef DUMB_OFT_CHECKSUM /* Yes, we are supposed to checksum the whole file before sending, and * yes, it's dumb. This is the only way to get some clients (such as * Mac AIM v4.5.163) to successfully complete the transfer. With * the WinAIM clients, we seem to be able to get away with just * setting the checksum to zero. * -- wtm */ { int fd = open(filename, O_RDONLY); if (fd >= 0) { int bytes; char buf[1024]; fh->checksum = 0xffff0000; while ((bytes = aim_recv(fd, buf, 1024)) > 0) { fh->checksum = aim_oft_checksum(buf, bytes, fh->checksum); } } close(fd); } #else fh->checksum = 0x00000000; #endif fh->encrypt = 0x0000; fh->compress = 0x0000; fh->totfiles = numfiles; fh->filesleft = numfiles - filesdone; fh->totparts = 0x0001; /* set to 0x0002 sending Mac resource forks */ fh->partsleft = 0x0001; fh->totsize = totsize; fh->size = size; fh->modtime = (int)time(NULL); /* we'll go with current time for now */ /* fh->checksum set above */ fh->rfcsum = 0x00000000; fh->rfsize = 0x00000000; fh->cretime = 0x00000000; fh->rfcsum = 0x00000000; fh->nrecvd = 0x00000000; /* always zero initially */ fh->recvcsum= 0x00000000; /* ditto */ strncpy(fh->idstring, "OFT_Windows ICBMFT V1.1 32", sizeof(fh->idstring)); fh->flags = 0x02; fh->lnameoffset = 0x1a; fh->lsizeoffset = 0x10; memset(fh->dummy, 0, sizeof(fh->dummy)); memset(fh->macfileinfo, 0, sizeof(fh->macfileinfo)); /* apparently 0 is ASCII, 2 is UCS-2 */ /* it is likely that 3 is ISO 8859-1 */ fh->nencode = 0x0000; fh->nlanguage = 0x0000; /* Convert the directory separator to ^A for portability. */ strncpy(fh->name, filename, sizeof(fh->name)); oft_dirconvert(fh->name); /* XXX we should normally send a null cookie here, and make * the receiver fill it in for authentication -- wtm */ memcpy(fh->bcookie, ft->cookie, 8); if (!(cook = aim_checkcookie(sess, ft->cookie, AIM_COOKIETYPE_OFTSEND))) { return -1; } /* Update both headers to be safe. */ memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t)); memcpy(&(((struct aim_filetransfer_priv *)cook->data)->fh), fh, sizeof(struct aim_fileheader_t)); if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, AIM_OFT_PROTO_OFFER, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); free(fh); return -1; } if (aim_oft_buildheader(&newoft->data, fh) == -1) { aim_frame_destroy(newoft); free(fh); return -1; } memcpy(newoft->hdr.rend.magic, "OFT2", 4); newoft->hdr.rend.hdrlen = aim_bstream_curpos(&newoft->data); aim_tx_enqueue(sess, newoft); free(fh); return 0; } /** * aim_oft_getfile_ack - acknowledge a getfile download as complete * @sess: your session * @conn: the getfile conn to send the ack over * * Call this function after you have read all the data in a particular * filetransfer. Returns -1 on error, 0 on apparent success * */ faim_export int aim_oft_getfile_ack(aim_session_t *sess, aim_conn_t *conn) { return -EINVAL; #if 0 struct command_tx_struct *newoft; struct aim_filetransfer_priv *ft; if (!sess || !conn || !conn->priv) return -1; if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0202, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); return -1; } newoft->lock = 1; memcpy(newoft->hdr.oft.magic, "OFT2", 4); newoft->hdr.oft.hdr2len = 0x100-8; if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) { newoft->lock = 0; aim_frame_destroy(newoft); return -1; } ft = (struct aim_filetransfer_priv *)conn->priv; if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) { newoft->lock = 0; aim_frame_destroy(newoft); return -1; } newoft->lock = 0; aim_tx_enqueue(sess, newoft); return 0; #endif } /** * aim_oft_end - end a getfile/sendfile. * @sess: your session * @conn: the getfile connection * * call this before you close the getfile connection if you're on the * receiving/requesting end. */ faim_export int aim_oft_end(aim_session_t *sess, aim_conn_t *conn) { aim_frame_t *newoft; struct aim_filetransfer_priv *ft; if (!sess || !conn || !conn->internal) return -1; if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, AIM_OFT_PROTO_ACK, 0))) { faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n"); return -1; } ft = (struct aim_filetransfer_priv *)conn->internal; ft->state = 4; /* no longer wanting data */ ft->fh.flags = 0x21; if (aim_oft_buildheader(&(newoft->data), &(ft->fh)) == -1) { aim_frame_destroy(newoft); return -1; } memcpy(newoft->hdr.rend.magic, "OFT2", 4); newoft->hdr.rend.hdrlen = aim_bstream_curpos(&newoft->data); aim_tx_enqueue(sess, newoft); return 0; } /* * Convert the directory separator to ^A, which seems to be AOL's attempt at portability. */ static void oft_dirconvert(char *name) { char *c = name; while ((c = strchr(c, G_DIR_SEPARATOR))) *c = 0x01; }