src/ft.c

   1 /*
   2  * File transfer (OFT) and DirectIM (ODC).
   3  * (OSCAR File Transfer, Oscar Direct Connect(ion?)
   4  */
   5
   6 #define FAIM_INTERNAL
   7 #include <aim.h>
   8
   9
  10 #ifndef _WIN32
  11 #include <netdb.h>
  12 #include <sys/socket.h>
  13 #include <netinet/in.h>
  14 #include <sys/utsname.h> /* for aim_directim_initiate */
  15
  16 #include <arpa/inet.h> /* for inet_ntoa */
  17
  18 #endif
  19
  20 /* TODO:
  21    o look for memory leaks.. there's going to be shitloads, i'm sure.
  22 */
  23
  24 struct aim_directim_intdata {
  25         fu8_t cookie[8];
  26         char sn[MAXSNLEN+1];
  27         char ip[22];
  28 };
  29
  30 static int listenestablish(fu16_t portnum);
  31 static struct aim_fileheader_t *aim_oft_getfh(unsigned char *hdr);
  32
  33 /**
  34  * aim_handlerendconnect - call this to accept OFT connections and set up the required structures
  35  * @sess: the session
  36  * @cur: the conn the incoming connection is on
  37  *
  38  * call this when you get an outstanding read on a conn with subtype
  39  * AIM_CONN_SUBTYPE_RENDEZVOUS_OUT, it will clone the current
  40  * &aim_conn_t and tweak things as appropriate. the new conn and the
  41  * listener conn are both returned to the client in the
  42  * %AIM_CB_FAM_OFT, %AIM_CB_OFT_<CLASS>INITIATE callback.
  43  */
  44 faim_export int aim_handlerendconnect(aim_session_t *sess, aim_conn_t *cur)
  45 {
  46         int acceptfd = 0;
  47         struct sockaddr cliaddr;
  48         int clilen = sizeof(cliaddr);
  49         int ret = 0;
  50         aim_conn_t *newconn;
  51
  52         if ((acceptfd = accept(cur->fd, &cliaddr, &clilen)) == -1)
  53                 return 0; /* not an error */
  54
  55         if (cliaddr.sa_family != AF_INET) { /* just in case IPv6 really is happening */
  56                 close(acceptfd);
  57                 aim_conn_close(cur);
  58                 return -1;
  59         }
  60
  61         if (!(newconn = aim_cloneconn(sess, cur))) {
  62                 close(acceptfd);
  63                 aim_conn_close(cur);
  64                 return -1;
  65         }
  66
  67         newconn->type = AIM_CONN_TYPE_RENDEZVOUS;
  68         newconn->fd = acceptfd;
  69
  70         if (newconn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM) {
  71                 struct aim_directim_intdata *priv;
  72                 aim_rxcallback_t userfunc;
  73
  74                 priv = (struct aim_directim_intdata *)(newconn->internal = cur->internal);
  75                 cur->internal = NULL;
  76
  77                 snprintf(priv->ip, sizeof(priv->ip), "%s:%u",
  78                                 inet_ntoa(((struct sockaddr_in *)&cliaddr)->sin_addr),
  79                                 ntohs(((struct sockaddr_in *)&cliaddr)->sin_port));
  80
  81                 if ((userfunc = aim_callhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINITIATE)))
  82                         ret = userfunc(sess, NULL, newconn, cur);
  83
  84         } else if (newconn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE) {
  85 #if 0
  86                 struct aim_filetransfer_priv *priv;
  87                 aim_rxcallback_t userfunc;
  88
  89
  90                 newconn->priv = cur->priv;
  91                 cur->priv = NULL;
  92                 priv = (struct aim_filetransfer_priv *)newconn->priv;
  93
  94                 snprintf(priv->ip, sizeof(priv->ip), "%s:%u", inet_ntoa(((struct sockaddr_in *)&cliaddr)->sin_addr), ntohs(((struct sockaddr_in *)&cliaddr)->sin_port));
  95
  96                 if ((userfunc = aim_callhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEINITIATE)))
  97                         ret = userfunc(sess, NULL, newconn, cur);
  98 #endif
  99         } else {
 100                 faimdprintf(sess, 1,"Got a Connection on a listener that's not Rendezvous(??!) Closing conn.\n");
 101                 aim_conn_close(newconn);
 102                 ret = -1;
 103         }
 104
 105         return ret;
 106 }
 107
 108 /**
 109  * aim_send_im_direct - send IM client-to-client over established connection
 110  * @sess: session to conn
 111  * @conn: directim connection
 112  * @msg: null-terminated string to send; if this is NULL, it will send a "typing" notice.
 113  *
 114  * Call this just like you would aim_send_im, to send a directim. You
 115  * _must_ have previously established the directim connection.
 116  */
 117 faim_export int aim_send_im_direct(aim_session_t *sess, aim_conn_t *conn, const char *msg)
 118 {
 119         struct aim_directim_intdata *intdata = (struct aim_directim_intdata *)conn->internal;
 120         aim_frame_t *fr;
 121         aim_bstream_t hdrbs; /* XXX this should be within aim_frame_t */
 122
 123         if (!sess || !conn || (conn->type != AIM_CONN_TYPE_RENDEZVOUS))
 124                 return -EINVAL;
 125
 126         if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x01, strlen(msg))))
 127                return -ENOMEM;
 128
 129         memcpy(fr->hdr.oft.magic, "ODC2", 4);
 130
 131         fr->hdr.oft.hdr2len = 0x44;
 132
 133         if (!(fr->hdr.oft.hdr2 = calloc(1, fr->hdr.oft.hdr2len))) {
 134                 aim_frame_destroy(fr);
 135                 return -ENOMEM;
 136         }
 137
 138         aim_bstream_init(&hdrbs, fr->hdr.oft.hdr2, fr->hdr.oft.hdr2len);
 139
 140         aimbs_put16(&hdrbs, 0x0006);
 141         aimbs_put16(&hdrbs, 0x0000);
 142         aimbs_putraw(&hdrbs, intdata->cookie, 8);
 143         aimbs_put16(&hdrbs, 0x0000);
 144         aimbs_put16(&hdrbs, 0x0000);
 145         aimbs_put16(&hdrbs, 0x0000);
 146         aimbs_put16(&hdrbs, 0x0000);
 147         aimbs_put32(&hdrbs, strlen(msg));
 148         aimbs_put16(&hdrbs, 0x0000);
 149         aimbs_put16(&hdrbs, 0x0000);
 150         aimbs_put16(&hdrbs, 0x0000);
 151
 152         /* flags -- 0x000e for "typing", 0x0000 for message */
 153         aimbs_put16(&hdrbs, msg ? 0x0000 : 0x000e);
 154
 155         aimbs_put16(&hdrbs, 0x0000);
 156         aimbs_put16(&hdrbs, 0x0000);
 157         aimbs_putraw(&hdrbs, sess->sn, strlen(sess->sn));
 158
 159         aim_bstream_setpos(&hdrbs, 52); /* bleeehh */
 160
 161         aimbs_put8(&hdrbs, 0x00);
 162         aimbs_put16(&hdrbs, 0x0000);
 163         aimbs_put16(&hdrbs, 0x0000);
 164         aimbs_put16(&hdrbs, 0x0000);
 165         aimbs_put16(&hdrbs, 0x0000);
 166         aimbs_put16(&hdrbs, 0x0000);
 167         aimbs_put16(&hdrbs, 0x0000);
 168         aimbs_put16(&hdrbs, 0x0000);
 169
 170         /* end of hdr2 */
 171
 172         if (msg) {
 173 #if 0 /* XXX this is how you send buddy icon info... */
 174                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0008);
 175                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x000c);
 176                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0000);
 177                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x1466);
 178                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x0001);
 179                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x2e0f);
 180                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0x393e);
 181                 i += aimutil_put16(newpacket->hdr.oft.hdr2+i, 0xcac8);
 182 #endif
 183                 aimbs_putraw(&fr->data, msg, strlen(msg));
 184         }
 185
 186         aim_tx_enqueue(sess, fr);
 187
 188         return 0;
 189 }
 190
 191 /* XXX: give the client author the responsibility of setting up a
 192  * listener, then we no longer have a libfaim problem with broken
 193  * solaris *innocent smile* -jbm */
 194
 195 static int getlocalip(fu8_t *ip)
 196 {
 197         struct hostent *hptr;
 198         char localhost[129];
 199
 200         /* XXX if available, use getaddrinfo() */
 201         /* XXX allow client to specify which IP to use for multihomed boxes */
 202
 203         if (gethostname(localhost, 128) < 0)
 204                 return -1;
 205
 206         if (!(hptr = gethostbyname(localhost)))
 207                 return -1;
 208
 209         memcpy(ip, hptr->h_addr_list[0], 4);
 210
 211         return 0;
 212 }
 213
 214 /* XXX this should probably go in im.c */
 215 static int aim_request_directim(aim_session_t *sess, aim_conn_t *conn, const char *destsn, fu8_t *ip, fu16_t port, fu8_t *ckret)
 216 {
 217         fu8_t ck[8];
 218         aim_frame_t *fr;
 219         aim_snacid_t snacid;
 220         aim_tlvlist_t *tl = NULL, *itl = NULL;
 221         int hdrlen, i;
 222         fu8_t *hdr;
 223         aim_bstream_t hdrbs;
 224
 225         if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x02, 256+strlen(destsn))))
 226                 return -ENOMEM;
 227
 228         snacid = aim_cachesnac(sess, 0x0004, 0x0006, 0x0000, NULL, 0);
 229         aim_putsnac(&fr->data, 0x0004, 0x0006, 0x0000, snacid);
 230
 231         /*
 232          * Generate a random message cookie
 233          *
 234          * This cookie needs to be alphanumeric and NULL-terminated to be
 235          * TOC-compatible.
 236          *
 237          * XXX have I mentioned these should be generated in msgcookie.c?
 238          *
 239          */
 240         for (i = 0; i < 7; i++)
 241                 ck[i] = 0x30 + ((fu8_t) rand() % 10);
 242         ck[7] = '\0';
 243
 244         if (ckret)
 245                 memcpy(ckret, ck, 8);
 246
 247         /* Cookie */
 248         aimbs_putraw(&fr->data, ck, 8);
 249
 250         /* Channel */
 251         aimbs_put16(&fr->data, 0x0002);
 252
 253         /* Destination SN */
 254         aimbs_put8(&fr->data, strlen(destsn));
 255         aimbs_putraw(&fr->data, destsn, strlen(destsn));
 256
 257         aim_addtlvtochain_noval(&tl, 0x0003);
 258
 259         hdrlen = 2+8+16+6+8+6+4;
 260         hdr = malloc(hdrlen);
 261         aim_bstream_init(&hdrbs, hdr, hdrlen);
 262
 263         aimbs_put16(&hdrbs, 0x0000);
 264         aimbs_putraw(&hdrbs, ck, 8);
 265         aim_putcap(&hdrbs, AIM_CAPS_IMIMAGE);
 266
 267         aim_addtlvtochain16(&itl, 0x000a, 0x0001);
 268         aim_addtlvtochain_raw(&itl, 0x0003, 4, ip);
 269         aim_addtlvtochain16(&itl, 0x0005, port);
 270         aim_addtlvtochain_noval(&itl, 0x000f);
 271
 272         aim_writetlvchain(&hdrbs, &itl);
 273
 274         aim_addtlvtochain_raw(&tl, 0x0005, aim_bstream_curpos(&hdrbs), hdr);
 275
 276         aim_writetlvchain(&fr->data, &tl);
 277
 278         free(hdr);
 279         aim_freetlvchain(&itl);
 280         aim_freetlvchain(&tl);
 281
 282         aim_tx_enqueue(sess, fr);
 283
 284         return 0;
 285 }
 286
 287 /**
 288  * aim_directim_intitiate - For those times when we want to open up the directim channel ourselves.
 289  * @sess: your session,
 290  * @conn: the BOS conn,
 291  * @priv: a dummy priv value (we'll let it get filled in later) (if you pass a %NULL, we alloc one)
 292  * @destsn: the SN to connect to.
 293  *
 294  */
 295 faim_export aim_conn_t *aim_directim_initiate(aim_session_t *sess, aim_conn_t *conn, const char *destsn)
 296 {
 297         aim_conn_t *newconn;
 298         aim_msgcookie_t *cookie;
 299         struct aim_directim_intdata *priv;
 300         int listenfd;
 301         fu16_t port = 4443;
 302         fu8_t localip[4];
 303         fu8_t ck[8];
 304
 305         if (getlocalip(localip) == -1)
 306                 return NULL;
 307
 308         if ((listenfd = listenestablish(port)) == -1)
 309                 return NULL;
 310
 311         aim_request_directim(sess, conn, destsn, localip, port, ck);
 312
 313         cookie = (aim_msgcookie_t *)calloc(1, sizeof(aim_msgcookie_t));
 314         memcpy(cookie->cookie, ck, 8);
 315         cookie->type = AIM_COOKIETYPE_OFTIM;
 316
 317         priv = (struct aim_directim_intdata *)calloc(1, sizeof(struct aim_directim_intdata));
 318
 319         memcpy(priv->cookie, ck, 8);
 320         memcpy(priv->sn, destsn, sizeof(priv->sn));
 321         cookie->data = priv;
 322         aim_cachecookie(sess, cookie);
 323
 324         /* XXX switch to aim_cloneconn()? */
 325         if (!(newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS_OUT, NULL))) {
 326                 close(listenfd);
 327                 return NULL;
 328         }
 329
 330         /* this one is for the conn */
 331         priv = (struct aim_directim_intdata *)calloc(1, sizeof(struct aim_directim_intdata));
 332
 333         memcpy(priv->cookie, ck, 8);
 334         memcpy(priv->sn, destsn, sizeof(priv->sn));
 335
 336         newconn->fd = listenfd;
 337         newconn->subtype = AIM_CONN_SUBTYPE_OFT_DIRECTIM;
 338         newconn->internal = priv;
 339         newconn->lastactivity = time(NULL);
 340
 341         faimdprintf(sess, 2,"faim: listening (fd = %d, unconnected)\n", newconn->fd);
 342
 343         return newconn;
 344 }
 345
 346 #if 0
 347 /**
 348  * unsigned int aim_oft_listener_clean - close up old listeners
 349  * @sess: session to clean up in
 350  * @age: maximum age in seconds
 351  *
 352  * returns number closed, -1 on error.
 353  */
 354 faim_export unsigned int aim_oft_listener_clean(struct aim_session_t *sess, time_t age)
 355 {
 356   struct aim_conn_t *cur;
 357   time_t now;
 358   unsigned int hit = 0;
 359
 360   if (!sess)
 361     return -1;
 362   now = time(NULL);
 363   faim_mutex_lock(&sess->connlistlock);
 364   for(cur = sess->connlist;cur; cur = cur->next)
 365     if (cur->type == AIM_CONN_TYPE_RENDEZVOUS_OUT) {
 366       faim_mutex_lock(&cur->active);
 367       if (cur->lastactivity < (now - age) ) {
 368         faim_mutex_unlock(&cur->active);
 369         aim_conn_close(cur);
 370         hit++;
 371       } else
 372         faim_mutex_unlock(&cur->active);
 373     }
 374   faim_mutex_unlock(&sess->connlistlock);
 375   return hit;
 376 }
 377 #endif
 378
 379 faim_export const char *aim_directim_getsn(aim_conn_t *conn)
 380 {
 381         struct aim_directim_intdata *intdata;
 382
 383         if (!conn)
 384                return NULL;
 385
 386         if ((conn->type != AIM_CONN_TYPE_RENDEZVOUS) ||
 387                         (conn->subtype != AIM_CONN_SUBTYPE_OFT_DIRECTIM))
 388                return NULL;
 389
 390         if (!conn->internal)
 391                 return NULL;
 392
 393         intdata = (struct aim_directim_intdata *)conn->internal;
 394
 395         return intdata->sn;
 396 }
 397
 398 /**
 399  * aim_directim_connect - connect to buddy for directim
 400  * @sess: the session to append the conn to,
 401  * @sn: the SN we're connecting to
 402  * @addr: address to connect to
 403  *
 404  * This is a wrapper for aim_newconn.
 405  *
 406  * If addr is NULL, the socket is not created, but the connection is
 407  * allocated and setup to connect.
 408  *
 409  */
 410 faim_export aim_conn_t *aim_directim_connect(aim_session_t *sess, const char *sn, const char *addr, const fu8_t *cookie)
 411 {
 412         aim_conn_t *newconn;
 413         struct aim_directim_intdata *intdata;
 414
 415         if (!sess || !sn)
 416                 return NULL;
 417
 418         if (!(intdata = malloc(sizeof(struct aim_directim_intdata))))
 419                 return NULL;
 420         memset(intdata, 0, sizeof(struct aim_directim_intdata));
 421
 422         memcpy(intdata->cookie, cookie, 8);
 423         strncpy(intdata->sn, sn, sizeof(intdata->sn));
 424         if (addr)
 425                 strncpy(intdata->ip, addr, sizeof(intdata->ip));
 426
 427         /* XXX verify that non-blocking connects actually work */
 428         if (!(newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS, addr))) {
 429                 free(intdata);
 430                 return NULL;
 431         }
 432
 433         if (!newconn || (newconn->fd == -1)) {
 434                 free(intdata);
 435                 return newconn;
 436         }
 437
 438         newconn->subtype = AIM_CONN_SUBTYPE_OFT_DIRECTIM;
 439         newconn->internal = intdata;
 440
 441         return newconn;
 442 }
 443
 444 /**
 445  * aim_directim_getconn - find a directim conn for buddy name
 446  * @sess: your session,
 447  * @name: the name to get,
 448  *
 449  * returns conn for directim with name, %NULL if none found.
 450  *
 451  */
 452 faim_export aim_conn_t *aim_directim_getconn(aim_session_t *sess, const char *name)
 453 {
 454         aim_conn_t *cur;
 455
 456         if (!sess || !name || !strlen(name))
 457                 return NULL;
 458
 459         for (cur = sess->connlist; cur; cur = cur->next) {
 460                 struct aim_directim_intdata *intdata;
 461
 462                 if ((cur->type != AIM_CONN_TYPE_RENDEZVOUS) || (cur->subtype != AIM_CONN_SUBTYPE_OFT_DIRECTIM))
 463                         continue;
 464
 465                 intdata = cur->internal;
 466
 467                 if (aim_sncmp(intdata->sn, name) == 0)
 468                         break;
 469         }
 470
 471         return cur;
 472 }
 473
 474 /**
 475  * aim_accepttransfer - accept a file transfer request
 476  * @sess: the session,
 477  * @conn: the BOS conn for the CAP reply
 478  * @sn: the screenname to send it to,
 479  * @cookie: the cookie used
 480  * @ip: the ip to connect to
 481  * @listingfiles: number of files to share
 482  * @listingtotsize: total size of shared files
 483  * @listingsize: length of the listing file(buffer)
 484  * @listingchecksum: checksum of the listing
 485  * @rendid: capability type (%AIM_CAPS_GETFILE or %AIM_CAPS_SENDFILE)
 486  *
 487  * Returns new connection or %NULL on error.
 488  *
 489  * XXX this should take a struct.
 490  */
 491 faim_export aim_conn_t *aim_accepttransfer(aim_session_t *sess,
 492                                                   aim_conn_t *conn,
 493                                                   const char *sn, const fu8_t *cookie,
 494                                                   const fu8_t *ip,
 495                                                   fu16_t listingfiles,
 496                                                   fu16_t listingtotsize,
 497                                                   fu16_t listingsize,
 498                                                   fu32_t listingchecksum,
 499                                                   fu16_t rendid)
 500 {
 501        return NULL;
 502 #if 0
 503   struct command_tx_struct *newpacket, *newoft;
 504   struct aim_conn_t *newconn;
 505   struct aim_fileheader_t *fh;
 506   struct aim_filetransfer_priv *priv;
 507   struct aim_msgcookie_t *cachedcook;
 508   int curbyte, i;
 509
 510   if (!sess || !conn || !sn || !cookie || !ip) {
 511     return NULL;
 512   }
 513
 514   newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS, ip);
 515
 516   if (!newconn || (newconn->fd == -1)) {
 517     perror("aim_newconn");
 518     faimdprintf(sess, 2, "could not connect to %s (fd: %i)\n", ip, newconn?newconn->fd:0);
 519     return newconn;
 520   } else {
 521     priv = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv));
 522
 523     memcpy(priv->cookie, cookie, 8);
 524     priv->state = 0;
 525     strncpy(priv->sn, sn, MAXSNLEN);
 526     strncpy(priv->ip, ip, sizeof(priv->ip));
 527     newconn->priv = (void *)priv;
 528
 529     faimdprintf(sess, 2, "faim: connected to peer (fd = %d)\n", newconn->fd);
 530   }
 531
 532   if (rendid == AIM_CAPS_GETFILE)  {
 533     newconn->subtype = AIM_CONN_SUBTYPE_OFT_GETFILE;
 534
 535       faimdprintf(sess, 2, "faim: getfile request accept\n");
 536
 537       if (!(newoft = aim_tx_new(sess, newconn, AIM_FRAMETYPE_OFT, 0x1108, 0))) {
 538         faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n");
 539         /* XXX: conn leak here */
 540         return NULL;
 541       }
 542
 543       newoft->lock = 1;
 544       memcpy(newoft->hdr.oft.magic, "OFT2", 4);
 545       newoft->hdr.oft.hdr2len = 0x100 - 8;
 546
 547       if (!(fh = (struct aim_fileheader_t*)calloc(1, sizeof(struct aim_fileheader_t)))) {
 548         /* XXX: conn leak here */
 549         perror("calloc");
 550         return NULL;
 551       }
 552
 553       fh->encrypt = 0x0000;
 554       fh->compress = 0x0000;
 555       fh->totfiles = listingfiles;
 556       fh->filesleft = listingfiles;      /* is this right -- total parts and parts left?*/
 557       fh->totparts = 0x0001;
 558       fh->partsleft = 0x0001;
 559       fh->totsize = listingtotsize;
 560       fh->size = listingsize;      /* ls -l listing.txt */
 561       fh->modtime = (int)time(NULL); /* we'll go with current time for now */
 562       fh->checksum = listingchecksum;
 563       fh->rfcsum = 0x00000000;
 564       fh->rfsize = 0x00000000;
 565       fh->cretime = 0x00000000;
 566       fh->rfcsum = 0x00000000;
 567       fh->nrecvd = 0x00000000;
 568       fh->recvcsum = 0x00000000;
 569       memset(fh->idstring, 0, sizeof(fh->idstring));
 570       memcpy(fh->idstring, "OFT_Windows ICBMFT V1.1 32", sizeof(fh->idstring));
 571       fh->flags = 0x02;
 572       fh->lnameoffset = 0x1a;
 573       fh->lsizeoffset = 0x10;
 574       memset(fh->dummy, 0, sizeof(fh->dummy));
 575       memset(fh->macfileinfo, 0, sizeof(fh->macfileinfo));
 576
 577       /* we need to figure out these encodings for filenames */
 578       fh->nencode = 0x0000;
 579       fh->nlanguage = 0x0000;
 580       memset(fh->name, 0, sizeof(fh->name));
 581       memcpy(fh->name, "listing.txt", sizeof(fh->name));
 582
 583       if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) {
 584         newoft->lock = 0;
 585         aim_frame_destroy(newoft);
 586         /* XXX: conn leak */
 587         perror("calloc (1)");
 588         return NULL;
 589       }
 590
 591       memcpy(fh->bcookie, cookie, 8);
 592
 593       if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, fh)))
 594         faimdprintf(sess, 1, "eek, bh fail!\n");
 595
 596       newoft->lock = 0;
 597       aim_tx_enqueue(sess, newoft);
 598
 599       if (!(cachedcook = (struct aim_msgcookie_t *)calloc(1, sizeof(struct aim_msgcookie_t)))) {
 600         faimdprintf(sess, 1, "faim: accepttransfer: couldn't calloc cachedcook. yeep!\n");
 601         /* XXX: more cleanup, conn leak */
 602         perror("calloc (2)");
 603         return NULL;
 604       }
 605
 606       memcpy(&(priv->fh), fh, sizeof(struct aim_fileheader_t));
 607       memcpy(cachedcook->cookie, cookie, 8);
 608
 609       cachedcook->type = AIM_COOKIETYPE_OFTGET;
 610       cachedcook->data = (void *)priv;
 611
 612       if (aim_cachecookie(sess, cachedcook) == -1)
 613         faimdprintf(sess, 1, "faim: ERROR caching message cookie\n");
 614
 615       free(fh);
 616
 617       /* OSCAR CAP accept packet */
 618
 619       if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+8+2+1+strlen(sn)+4+2+8+16))) {
 620         return NULL;
 621       }
 622   } else {
 623     return NULL;
 624   }
 625
 626   newpacket->lock = 1;
 627   curbyte = aim_putsnac(newpacket->data, 0x0004, 0x0006, 0x0000, sess->snac_nextid);
 628
 629   for (i = 0; i < 8; i++)
 630     curbyte += aimutil_put8(newpacket->data+curbyte, cookie[i]);
 631
 632   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002);
 633   curbyte += aimutil_put8(newpacket->data+curbyte, strlen(sn));
 634   curbyte += aimutil_putstr(newpacket->data+curbyte, sn, strlen(sn));
 635   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0005);
 636   curbyte += aimutil_put16(newpacket->data+curbyte, 0x001a);
 637   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002 /* accept*/);
 638
 639   for (i = 0;i < 8; i++)
 640     curbyte += aimutil_put8(newpacket->data+curbyte, cookie[i]);
 641
 642   curbyte += aim_putcap(newpacket->data+curbyte, 0x10, rendid);
 643   newpacket->lock = 0;
 644   aim_tx_enqueue(sess, newpacket);
 645
 646   return newconn;
 647 #endif
 648 }
 649
 650 /**
 651  * aim_getlisting(FILE *file) -- get an aim_fileheader_t for a given FILE*
 652  *  @file is an opened listing file
 653  *
 654  * returns a pointer to the filled-in fileheader_t
 655  *
 656  * Currently omits checksum. we'll fix this when AOL breaks us, i
 657  * guess.
 658  *
 659  */
 660 faim_export struct aim_fileheader_t *aim_getlisting(aim_session_t *sess, FILE *file)
 661 {
 662         return NULL;
 663 #if 0
 664   struct aim_fileheader_t *fh;
 665   u_long totsize = 0, size = 0, checksum = 0xffff0000;
 666   short totfiles = 0;
 667   char *linebuf, sizebuf[9];
 668
 669   int linelength = 1024;
 670
 671   /* XXX: if we have a line longer than 1024chars, God help us. */
 672   if ( (linebuf = (char *)calloc(1, linelength)) == NULL ) {
 673     faimdprintf(sess, 2, "linebuf calloc failed\n");
 674     return NULL;
 675   }
 676
 677   if (fseek(file, 0, SEEK_END) == -1) { /* use this for sanity check */
 678     perror("getlisting END1 fseek:");
 679     faimdprintf(sess, 2, "getlising fseek END1 error\n");
 680   }
 681
 682   if ((size = ftell(file)) == -1) {
 683     perror("getlisting END1 getpos:");
 684     faimdprintf(sess, 2, "getlising getpos END1 error\n");
 685   }
 686
 687   if (fseek(file, 0, SEEK_SET) != 0) {
 688     perror("getlesting fseek(SET):");
 689     faimdprintf(sess, 2, "faim: getlisting: couldn't seek to beginning of listing file\n");
 690   }
 691
 692   memset(linebuf, 0, linelength);
 693
 694   size = 0;
 695
 696   while(fgets(linebuf,  linelength, file)) {
 697     totfiles++;
 698     memset(sizebuf, 0, 9);
 699
 700     size += strlen(linebuf);
 701
 702     if (strlen(linebuf) < 23) {
 703       faimdprintf(sess, 2, "line \"%s\" too short. skipping\n", linebuf);
 704       continue;
 705     }
 706     if (linebuf[strlen(linebuf)-1] != '\n') {
 707       faimdprintf(sess, 2, "faim: OFT: getlisting -- hit EOF or line too long!\n");
 708     }
 709
 710     memcpy(sizebuf, linebuf+17, 8);
 711
 712     totsize += strtol(sizebuf, NULL, 10);
 713     memset(linebuf, 0, linelength);
 714   }
 715
 716   if (fseek(file, 0, SEEK_SET) == -1) {
 717     perror("getlisting END2 fseek:");
 718     faimdprintf(sess, 2, "getlising fseek END2 error\n");
 719   }
 720
 721   free(linebuf);
 722
 723   /* we're going to ignore checksumming the data for now -- that
 724    * requires walking the whole listing.txt. it should probably be
 725    * done at register time and cached, but, eh. */
 726
 727   if (!(fh = (struct aim_fileheader_t*)calloc(1, sizeof(struct aim_fileheader_t))))
 728     return NULL;
 729
 730   fh->encrypt     = 0x0000;
 731   fh->compress    = 0x0000;
 732   fh->totfiles    = totfiles;
 733   fh->filesleft   = totfiles; /* is this right ?*/
 734   fh->totparts    = 0x0001;
 735   fh->partsleft   = 0x0001;
 736   fh->totsize     = totsize;
 737   fh->size        = size; /* ls -l listing.txt */
 738   fh->modtime     = (int)time(NULL); /* we'll go with current time for now */
 739   fh->checksum    = checksum; /* XXX: checksum ! */
 740   fh->rfcsum      = 0x00000000;
 741   fh->rfsize      = 0x00000000;
 742   fh->cretime     = 0x00000000;
 743   fh->rfcsum      = 0x00000000;
 744   fh->nrecvd      = 0x00000000;
 745   fh->recvcsum    = 0x00000000;
 746
 747   /*  memset(fh->idstring, 0, sizeof(fh->idstring)); */
 748   memcpy(fh->idstring, "OFT_Windows ICBMFT V1.1 32", sizeof(fh->idstring));
 749   memset(fh->idstring+strlen(fh->idstring), 0, sizeof(fh->idstring)-strlen(fh->idstring));
 750
 751   fh->flags       = 0x02;
 752   fh->lnameoffset = 0x1a;
 753   fh->lsizeoffset = 0x10;
 754
 755   /*  memset(fh->dummy, 0, sizeof(fh->dummy)); */
 756   memset(fh->macfileinfo, 0, sizeof(fh->macfileinfo));
 757
 758   fh->nencode     = 0x0000; /* we need to figure out these encodings for filenames */
 759   fh->nlanguage   = 0x0000;
 760
 761   /*  memset(fh->name, 0, sizeof(fh->name)); */
 762   memcpy(fh->name, "listing.txt", sizeof(fh->name));
 763   memset(fh->name+strlen(fh->name), 0, 64-strlen(fh->name));
 764
 765   faimdprintf(sess, 2, "faim: OFT: listing fh name %s / %s\n", fh->name, (fh->name+(strlen(fh->name))));
 766   return fh;
 767 #endif
 768 }
 769
 770 /**
 771  * aim_listenestablish - create a listening socket on a port.
 772  * @portnum: the port number to bind to.
 773  *
 774  * you need to call accept() when it's connected. returns your fd
 775  *
 776  */
 777 static int listenestablish(fu16_t portnum)
 778 {
 779 #if defined(__linux__)
 780         /* XXX what other OS's support getaddrinfo? */
 781         int listenfd;
 782         const int on = 1;
 783         struct addrinfo hints, *res, *ressave;
 784         char serv[5];
 785
 786         snprintf(serv, sizeof(serv), "%d", portnum);
 787         memset(&hints, 0, sizeof(struct addrinfo));
 788         hints.ai_flags = AI_PASSIVE;
 789         hints.ai_family = AF_UNSPEC;
 790         hints.ai_socktype = SOCK_STREAM;
 791         if (getaddrinfo(NULL /*any IP*/, serv, &hints, &res) != 0) {
 792                 perror("getaddrinfo");
 793                 return -1;
 794         }
 795         ressave = res;
 796         do {
 797                 listenfd = socket(res->ai_family, res->ai_socktype, res->ai_protocol);
 798                 if (listenfd < 0)
 799                         continue;
 800                 setsockopt(listenfd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
 801                 if (bind(listenfd, res->ai_addr, res->ai_addrlen) == 0)
 802                         break;
 803                 /* success */
 804                 close(listenfd);
 805         } while ( (res = res->ai_next) );
 806
 807         if (!res)
 808                 return -1;
 809
 810         if (listen(listenfd, 1024)!=0) {
 811                 perror("listen");
 812                 return -1;
 813         }
 814
 815         freeaddrinfo(ressave);
 816         return listenfd;
 817 #else
 818         int listenfd;
 819         const int on = 1;
 820         struct sockaddr_in sockin;
 821
 822         if ((listenfd = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
 823                 perror("socket(listenfd)");
 824                 return -1;
 825         }
 826
 827         if (setsockopt(listenfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on) != 0)) {
 828                 perror("setsockopt(listenfd)");
 829                 close(listenfd);
 830                 return -1;
 831         }
 832
 833         memset(&sockin, 0, sizeof(struct sockaddr_in));
 834         sockin.sin_family = AF_INET;
 835         sockin.sin_port = htons(portnum);
 836
 837         if (bind(listenfd, (struct sockaddr *)&sockin, sizeof(struct sockaddr_in)) != 0) {
 838                 perror("bind(listenfd)");
 839                 close(listenfd);
 840                 return -1;
 841         }
 842         if (listen(listenfd, 4) != 0) {
 843                 perror("listen(listenfd)");
 844                 close(listenfd);
 845                 return -1;
 846         }
 847         return listenfd;
 848 #endif
 849 }
 850
 851 static int getcommand_getfile(aim_session_t *sess, aim_conn_t *conn)
 852 {
 853 #if 0
 854         struct aim_filetransfer_priv *ft;
 855         aim_rxcallback_t userfunc;
 856
 857         ft = conn->priv;
 858         if (ft->state == 2) {
 859                 /* waiting on listing data */
 860                 int ret = 0;
 861                 char *listing;
 862                 struct command_tx_struct *newoft;
 863
 864                 if (!(listing = malloc(ft->fh.size)))
 865                         return -1;
 866
 867                 ft->state = 0;
 868                 if (aim_recv(conn->fd, listing, ft->fh.size) != ft->fh.size)
 869                         faimdprintf(sess, 2, "OFT get: file %s was short. (0x%lx)\n", ft->fh.name, ft->fh.size);
 870
 871                 if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x120b, 0))) {
 872                         faimdprintf(sess, 2, "faim: aim_get_command_rendezvous: getfile listing: tx_new OFT failed\n");
 873                         faim_mutex_unlock(&conn->active);
 874                         free(listing);
 875                         aim_conn_close(conn);
 876                         return -1;
 877                 }
 878
 879                 memcpy(newoft->hdr.oft.magic, "OFT2", 4);
 880                 newoft->hdr.oft.hdr2len = 0x100 - 8;
 881
 882                 /* Protocol BS - set nrecvd to size of listing, recvcsum to listing checksum, flags to 0 */
 883
 884                 ft->fh.nrecvd = ft->fh.size;
 885                 ft->fh.recvcsum = ft->fh.checksum;
 886                 ft->fh.flags = 0;
 887
 888                 if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) {
 889                         aim_frame_destroy(newoft);
 890                         free(listing);
 891                         return -1;
 892                 }
 893
 894                 if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh))))
 895                         faimdprintf(sess, 2, "eek! bh fail listing\n");
 896
 897                 /* send the 120b */
 898                 aim_tx_enqueue(sess, newoft);
 899                 if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTING)) )
 900                         ret = userfunc(sess, NULL, conn, ft, listing);
 901
 902                 free(listing);
 903                 return ret;
 904         }
 905
 906         if (ft->state == 3) {
 907                 /* waiting on file data */
 908                 if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILERECEIVE)) )
 909                         return userfunc(sess, NULL, conn, ft);
 910                 return 0;
 911         }
 912
 913         if (ft->state == 4) {
 914                 if( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILESTATE4)) )
 915                         return userfunc(sess, NULL, conn);
 916                 aim_conn_close(conn);
 917                 return 0;
 918         }
 919
 920         return 0;
 921 #else
 922         return -1;
 923 #endif
 924 }
 925
 926 static void connclose_sendfile(aim_session_t *sess, aim_conn_t *conn)
 927 {
 928         aim_msgcookie_t *cook;
 929         struct aim_filetransfer_priv *priv = (struct aim_filetransfer_priv *)conn->priv;
 930
 931         cook = aim_uncachecookie(sess, priv->cookie, AIM_COOKIETYPE_OFTSEND);
 932         aim_cookie_free(sess, cook);
 933
 934         return;
 935 }
 936
 937 static void connkill_sendfile(aim_session_t *sess, aim_conn_t *conn)
 938 {
 939
 940         free(conn->internal);
 941
 942         return;
 943 }
 944
 945 static void connclose_getfile(aim_session_t *sess, aim_conn_t *conn)
 946 {
 947         aim_msgcookie_t *cook;
 948         struct aim_filetransfer_priv *priv = (struct aim_filetransfer_priv *)conn->priv;
 949
 950         cook = aim_uncachecookie(sess, priv->cookie, AIM_COOKIETYPE_OFTGET);
 951         aim_cookie_free(sess, cook);
 952
 953         return;
 954 }
 955
 956 static void connkill_getfile(aim_session_t *sess, aim_conn_t *conn)
 957 {
 958
 959         free(conn->internal);
 960
 961         return;
 962 }
 963
 964 static void connclose_directim(aim_session_t *sess, aim_conn_t *conn)
 965 {
 966         struct aim_directim_intdata *intdata = (struct aim_directim_intdata *)conn->internal;
 967         aim_msgcookie_t *cook;
 968
 969         cook = aim_uncachecookie(sess, intdata->cookie, AIM_COOKIETYPE_OFTIM);
 970         aim_cookie_free(sess, cook);
 971
 972         return;
 973 }
 974
 975 static void connkill_directim(aim_session_t *sess, aim_conn_t *conn)
 976 {
 977
 978         free(conn->internal);
 979
 980         return;
 981 }
 982
 983 faim_internal void aim_conn_close_rend(aim_session_t *sess, aim_conn_t *conn)
 984 {
 985
 986         if (conn->type != AIM_CONN_TYPE_RENDEZVOUS)
 987                 return;
 988
 989         if (conn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE)
 990                 connclose_sendfile(sess, conn);
 991         else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE)
 992                 connclose_getfile(sess, conn);
 993         else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM)
 994                 connclose_directim(sess, conn);
 995
 996         return;
 997 }
 998
 999 faim_internal void aim_conn_kill_rend(aim_session_t *sess, aim_conn_t *conn)
1000 {
1001
1002         if (conn->type != AIM_CONN_TYPE_RENDEZVOUS)
1003                 return;
1004
1005         if (conn->subtype == AIM_CONN_SUBTYPE_OFT_SENDFILE)
1006                 connkill_sendfile(sess, conn);
1007         else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE)
1008                 connkill_getfile(sess, conn);
1009         else if (conn->subtype == AIM_CONN_SUBTYPE_OFT_DIRECTIM)
1010                 connkill_directim(sess, conn);
1011
1012         return;
1013 }
1014
1015 static int handlehdr_directim(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1016 {
1017         aim_frame_t fr;
1018         aim_rxcallback_t userfunc;
1019         fu32_t payloadlength;
1020         fu16_t flags;
1021         char *snptr = NULL;
1022
1023         fr.conn = conn;
1024
1025         payloadlength = aimutil_get32(hdr+22);
1026         flags = aimutil_get16(hdr+32);
1027         snptr = (char *)hdr+38;
1028
1029         faimdprintf(sess, 2, "faim: OFT frame: handlehdr_directim: %04x / %04x / %s\n", payloadlength, flags, snptr);
1030
1031         if (flags == 0x000e) {
1032                 int ret = 0;
1033
1034                 if ((userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMTYPING)))
1035                         ret = userfunc(sess, &fr, snptr);
1036
1037                 return ret;
1038
1039         } else if ((flags == 0x0000) && payloadlength) {
1040                 char *msg;
1041                 int ret = 0;
1042
1043                 if (!(msg = calloc(1, payloadlength+1)))
1044                         return -1;
1045
1046                 if (aim_recv(conn->fd, msg, payloadlength) < payloadlength) {
1047                         free(msg);
1048                         return -1;
1049                 }
1050
1051                 msg[payloadlength] = '\0';
1052
1053                 if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINCOMING)) )
1054                         ret = userfunc(sess, &fr, snptr, msg);
1055
1056                 free(msg);
1057
1058                 return ret;
1059         }
1060
1061         return 0;
1062 }
1063
1064 static int handlehdr_getfile_listing(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1065 {
1066 #if 0
1067         struct aim_filetransfer_priv *ft;
1068         struct aim_fileheader_t *fh;
1069         struct aim_msgcookie_t *cook;
1070         struct command_tx_struct *newoft;
1071         aim_rxcallback_t userfunc;
1072
1073         faimdprintf(sess, 2,"faim: rend: fileget 0x1108\n");
1074         fh = aim_oft_getfh(hdr);
1075
1076         faim_mutex_unlock(&conn->active);
1077
1078         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) {
1079                 free(fh);
1080                 return -1;
1081         }
1082
1083         ft = cook->data;
1084
1085         /* we're waaaaiiiting.. for listing.txt */
1086         ft->state = 2;
1087
1088         memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t));
1089         free(fh);
1090
1091         if(aim_cachecookie(sess, cook) == -1) {
1092                 faimdprintf(sess, 1, "error caching cookie\n");
1093                 return -1;
1094         }
1095
1096         if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x1209, 0))) {
1097                 aim_conn_close(conn);
1098                 return -1;
1099         }
1100
1101         memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1102         newoft->hdr.oft.hdr2len = 0x100 - 8;
1103
1104         if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) {
1105                 newoft->lock = 0;
1106                 aim_frame_destroy(newoft);
1107                 return -1;
1108         }
1109
1110         if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) {
1111                 newoft->lock = 0;
1112                 aim_frame_destroy(newoft);
1113                 return -1;
1114         }
1115
1116         newoft->lock = 0;
1117         aim_tx_enqueue(sess, newoft);
1118 #endif
1119         return -1;
1120 }
1121
1122 static int handlehdr_getfile_listing2(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1123 {
1124 #if 0
1125         struct aim_filetransfer_priv *ft;
1126         struct aim_fileheader_t *fh;
1127         struct aim_msgcookie_t *cook;
1128         int ret = 0;
1129         aim_rxcallback_t userfunc;
1130
1131         fh = aim_oft_getfh(hdr);
1132
1133         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET)))
1134                 faimdprintf(sess, 2, "shit, no cookie in 0x1209. (%i/%s)going to crash..\n",  AIM_COOKIETYPE_OFTGET, fh->bcookie);
1135
1136         ft = cook->data;
1137
1138         if (ft->fh.size != fh->size)
1139                 faimdprintf(sess, 2, "hrm. ft->fh.size (%ld) != fh->size (%ld). um. using ft->fh.size\n", ft->fh.size, fh->size);
1140
1141         if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGREQ)))
1142                 ret = userfunc(sess, NULL, conn, fh);
1143
1144         faimdprintf(sess, 2, "faim: get_command_rendezvous: hit end of 1209\n");
1145
1146         free(fh);
1147
1148         return ret;
1149 #else
1150         return -1;
1151 #endif
1152 }
1153
1154 static int handlehdr_getfile_listing3(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1155 {
1156 #if 0
1157         struct aim_filetransfer_priv *ft;
1158         struct aim_msgcookie_t *cook;
1159         struct aim_fileheader_t *fh;
1160         aim_rxcallback_t userfunc;
1161
1162         fh = aim_oft_getfh(hdr);
1163
1164         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) {
1165                 free(fh);
1166                 return -1;
1167         }
1168
1169         free(fh);
1170
1171         ft = cook->data;
1172
1173         if (aim_cachecookie(sess, cook) == -1)
1174                 return -1;
1175
1176         if ((userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGRXCONFIRM)))
1177                 return userfunc(sess, NULL, conn);
1178 #endif
1179         return -1;
1180 }
1181
1182 static int handlehdr_getfile_request(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1183 {
1184 #if 0
1185         struct aim_filetransfer_priv *ft;
1186         struct aim_msgcookie_t *cook;
1187         struct aim_fileheader_t *fh;
1188         struct command_tx_struct *newoft;
1189         int i = 0;
1190         aim_rxcallback_t userfunc;
1191
1192         fh = aim_oft_getfh(hdr);
1193
1194         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) {
1195                 free(fh);
1196                 return -1;
1197         }
1198
1199         ft = cook->data;
1200         memcpy(&(ft->fh), fh, sizeof(struct aim_fileheader_t));
1201         free(fh);
1202
1203         aim_cachecookie(sess, cook);
1204
1205         faimdprintf(sess, 2, "faim: fileget: %s seems to want %s\n", ft->sn, ft->fh.name);
1206
1207         if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ)) )
1208                 i = userfunc(sess, NULL, conn, &(ft->fh), cook->cookie);
1209
1210         if (i < 0)
1211                 return i;
1212
1213         if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0101, 0))) {
1214                 faimdprintf(sess, 2, "faim: send_final_transfer: tx_new OFT failed\n");
1215                 return -1;
1216         }
1217
1218         newoft->lock = 1;
1219         memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1220         newoft->hdr.oft.hdr2len = 0x100 - 8;
1221
1222         if (!(newoft->hdr.oft.hdr2 = calloc(1,newoft->hdr.oft.hdr2len))) {
1223                 aim_frame_destroy(newoft);
1224                 return -1;
1225         }
1226
1227         /* protocol BS: nrecvd, recvcsum to 0, flags to 0x20. */
1228         ft->fh.nrecvd = 0;
1229         ft->fh.recvcsum = 0;
1230         ft->fh.flags = 0x20;
1231
1232         aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh));
1233
1234         newoft->lock = 0;
1235         aim_tx_enqueue(sess, newoft);
1236
1237         faimdprintf(sess, 2, "faim: OFT: OFT file header enqueued.\n");
1238
1239         return i;
1240 #else
1241         return -1;
1242 #endif
1243 }
1244
1245 static int handlehdr_getfile_sending(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1246 {
1247 #if 0
1248         struct aim_fileheader_t *fh;
1249         struct aim_filetransfer_priv *ft;
1250         struct aim_msgcookie_t *cook;
1251         struct command_tx_struct *newoft;
1252         aim_rxcallback_t userfunc;
1253
1254         fh = aim_oft_getfh(hdr);
1255
1256         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) {
1257                 free(fh);
1258                 return -1;
1259         }
1260
1261         free(fh);
1262
1263         ft = cook->data;
1264
1265         ft->state = 3;
1266
1267         if (aim_cachecookie(sess, cook) == -1)
1268                 return -1;
1269
1270         faimdprintf(sess, 2, "faim: fileget: %s seems to want to send %s\n", ft->sn, ft->fh.name);
1271
1272         if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0202, 0))) {
1273                 faimdprintf(sess, 2, "faim: send_final_transfer: tx_new OFT failed\n");
1274                 return -1;
1275         }
1276
1277         newoft->lock = 1;
1278         memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1279
1280         newoft->hdr.oft.hdr2len = 0x100 - 8;
1281
1282         if (!(newoft->hdr.oft.hdr2 = calloc(1,newoft->hdr.oft.hdr2len))) {
1283                 aim_frame_destroy(newoft);
1284                 return -1;
1285         }
1286
1287         aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh));
1288
1289         newoft->lock = 0;
1290         aim_tx_enqueue(sess, newoft);
1291
1292         faimdprintf(sess, 2, "faim: OFT: OFT 0x0202 enqueued.\n");
1293
1294         if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ)) == NULL)
1295                 return 1;
1296 #else
1297         return -1;
1298 #endif
1299 }
1300
1301 static int handlehdr_getfile_recv(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1302 {
1303 #if 0
1304         struct aim_fileheader_t *fh;
1305         struct aim_filetransfer_priv *ft;
1306         struct aim_msgcookie_t *cook;
1307         int ret = 1;
1308         aim_rxcallback_t userfunc;
1309
1310         fh = aim_oft_getfh(hdr);
1311
1312         if (!(cook = aim_checkcookie(sess, fh->bcookie, AIM_COOKIETYPE_OFTGET))) {
1313                 free(fh);
1314                 return -1;
1315         }
1316
1317         ft = cook->data;
1318
1319         faimdprintf(sess, 2, "faim: get_rend: looks like we're ready to send data.(oft 0x0202)\n");
1320
1321         if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILESEND)) )
1322                 ret = userfunc(sess, NULL, conn, fh);
1323
1324         free(fh);
1325
1326         return ret;
1327 #else
1328         return -1;
1329 #endif
1330 }
1331
1332 static int handlehdr_getfile_finish(aim_session_t *sess, aim_conn_t *conn, fu8_t *hdr)
1333 {
1334 #if 0
1335         struct aim_fileheader_t *fh;
1336         aim_rxcallback_t userfunc;
1337
1338         fh = aim_oft_getfh(hdr);
1339
1340         faimdprintf(sess, 2, "faim: get_rend: looks like we're done with a transfer (oft 0x0204)\n");
1341
1342         if ( (userfunc = aim_callhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILECOMPLETE)) )
1343                 userfunc(sess, NULL, conn, fh);
1344
1345         free(fh);
1346 #endif
1347
1348         return -1;
1349 }
1350
1351 /**
1352  * aim_get_command_rendezvous - OFT equivalent of aim_get_command
1353  * @sess: session to work on
1354  * @conn: conn to pull data from
1355  *
1356  * this reads and handles data from conn->fd. currently a little rough
1357  * around the edges
1358  */
1359 faim_internal int aim_get_command_rendezvous(aim_session_t *sess, aim_conn_t *conn)
1360 {
1361         fu8_t hdrbuf1[6];
1362         fu8_t *hdr = NULL;
1363         int hdrlen, hdrtype;
1364         int ret = -1;
1365
1366         if (!sess || !conn)
1367                 return -1;
1368
1369         memset(hdrbuf1, 0, sizeof(hdrbuf1));
1370
1371         /* I guess? I didn't understand any of that mess... */
1372         if (conn->subtype == AIM_CONN_SUBTYPE_OFT_GETFILE)
1373                 return getcommand_getfile(sess, conn);
1374
1375         /* XXX fix all the error cases here */
1376         if (aim_recv(conn->fd, hdrbuf1, 6) < 6) {
1377
1378                 faimdprintf(sess, 2, "faim: rend: read error (fd: %i)\n", conn->fd);
1379
1380                 aim_conn_close(conn);
1381
1382                 return -1;
1383         }
1384
1385         hdrlen = aimutil_get16(hdrbuf1+4);
1386         hdrlen -= 6;
1387
1388         hdr = malloc(hdrlen);
1389
1390         if (aim_recv(conn->fd, hdr, hdrlen) < hdrlen) {
1391                 faimdprintf(sess, 2, "faim: rend: read2 error on %d (%d)\n", conn->fd, hdrlen);
1392                 free(hdr);
1393                 aim_conn_close(conn);
1394                 return -1;
1395         }
1396
1397         hdrtype = aimutil_get16(hdr);
1398
1399         if (hdrtype == 0x0001)
1400                 ret = handlehdr_directim(sess, conn, hdr);
1401         else if (hdrtype == 0x1108) /* getfile listing.txt incoming tx->rx */
1402                 ret = handlehdr_getfile_listing(sess, conn, hdr);
1403         else if (hdrtype == 0x1209) /* get file listing ack rx->tx */
1404                 ret = handlehdr_getfile_listing2(sess, conn, hdr);
1405         else if (hdrtype == 0x120b) /* get file listing rx confirm */
1406                 ret = handlehdr_getfile_listing3(sess, conn, hdr);
1407         else if (hdrtype == 0x120c) /* getfile request */
1408                 ret = handlehdr_getfile_request(sess, conn, hdr);
1409         else if (hdrtype == 0x0101) /* getfile sending data */
1410                 ret = handlehdr_getfile_sending(sess, conn, hdr);
1411         else if (hdrtype == 0x0202) /* getfile recv data */
1412                 ret = handlehdr_getfile_recv(sess, conn, hdr);
1413         else if (hdrtype == 0x0204) /* getfile finished */
1414                 ret = handlehdr_getfile_finish(sess, conn, hdr);
1415         else {
1416                 faimdprintf(sess, 2,"faim: OFT frame: uknown type %04x\n", hdrtype);
1417                 ret = -1;
1418         }
1419
1420         free(hdr);
1421
1422         if (ret == -1)
1423                 aim_conn_close(conn);
1424
1425         return ret;
1426 }
1427
1428 #if 0
1429 /**
1430  * aim_oft_getfh - extracts an &aim_fileheader_t from buffer hdr.
1431  * @hdr: buffer to extract header from
1432  *
1433  * returns pointer to new struct on success; %NULL on error.
1434  *
1435  */
1436 static struct aim_fileheader_t *aim_oft_getfh(unsigned char *hdr)
1437 {
1438   struct aim_fileheader_t *fh;
1439   int i, j;
1440   if (!(fh = calloc(1, sizeof(struct aim_fileheader_t))))
1441     return NULL;
1442
1443   /* [0] and [1] are the type. we can ignore those here. */
1444   i = 2;
1445   for(j = 0; j < 8; j++, i++)
1446     fh->bcookie[j] = hdr[i];
1447   fh->encrypt = aimutil_get16(hdr+i);
1448   i += 2;
1449   fh->compress = aimutil_get16(hdr+i);
1450   i += 2;
1451   fh->totfiles = aimutil_get16(hdr+i);
1452   i += 2;
1453   fh->filesleft = aimutil_get16(hdr+i);
1454   i += 2;
1455   fh->totparts = aimutil_get16(hdr+i);
1456   i += 2;
1457   fh->partsleft = aimutil_get16(hdr+i);
1458   i += 2;
1459   fh->totsize = aimutil_get32(hdr+i);
1460   i += 4;
1461   fh->size = aimutil_get32(hdr+i);
1462   i += 4;
1463   fh->modtime = aimutil_get32(hdr+i);
1464   i += 4;
1465   fh->checksum = aimutil_get32(hdr+i);
1466   i += 4;
1467   fh->rfrcsum = aimutil_get32(hdr+i);
1468   i += 4;
1469   fh->rfsize = aimutil_get32(hdr+i);
1470   i += 4;
1471   fh->cretime = aimutil_get32(hdr+i);
1472   i += 4;
1473   fh->rfcsum = aimutil_get32(hdr+i);
1474   i += 4;
1475   fh->nrecvd = aimutil_get32(hdr+i);
1476   i += 4;
1477   fh->recvcsum = aimutil_get32(hdr+i);
1478   i += 4;
1479   memcpy(fh->idstring, hdr+i, 32);
1480   i += 32;
1481   fh->flags = aimutil_get8(hdr+i);
1482   i += 1;
1483   fh->lnameoffset = aimutil_get8(hdr+i);
1484   i += 1;
1485   fh->lsizeoffset = aimutil_get8(hdr+i);
1486   i += 1;
1487   memcpy(fh->dummy, hdr+i, 69);
1488   i += 69;
1489   memcpy(fh->macfileinfo, hdr+i, 16);
1490   i += 16;
1491   fh->nencode = aimutil_get16(hdr+i);
1492   i += 2;
1493   fh->nlanguage = aimutil_get16(hdr+i);
1494   i += 2;
1495   memcpy(fh->name, hdr+i, 64);
1496   i += 64;
1497   return fh;
1498 }
1499 #endif
1500
1501 /**
1502  * aim_oft_checksum - calculate oft checksum of buffer
1503  * @buffer: buffer of data to checksum
1504  * @bufsize: size of buffer
1505  * @checksum: pointer to integer to place result in (pointer!)
1506  *
1507  *
1508  * Note that checksum is a pointer. Checksum should be filled with
1509  * 0xFFFF0000 for each new file; you can have this checksum chunks of
1510  * files in series if you just call it repeatedly in a for(; ; ) loop
1511  * and don't reset the checksum between each call. And you thought we
1512  * didn't care about you and your pathetic client's meomry footprint
1513  * ;^)
1514  *
1515  *
1516  * Also, it's been said that this is incorrect as currently
1517  * written. You were warned.
1518  */
1519 faim_export fu32_t aim_oft_checksum(aim_session_t *sess, const char *buffer, int bufsize, fu32_t *checksum)
1520 {
1521         return 0xdeadbeef;
1522 #if 0
1523   fu16_t check0, check1;
1524   int i;
1525
1526   check0 = ((*checksum & 0xFF000000) >> 16);
1527   check1 = ((*checksum & 0x00ff0000) >> 16);
1528   for(i = 0; i < bufsize; i++) {
1529     if (i % 2) { /* use check1 -- second byte */
1530       if ( (short)buffer[i] > check1 ) { /* wrapping */
1531         check1 += 0x100;  /* this is a cheap way to wrap */
1532
1533         /* if we're wrapping, decrement the other one */
1534         /* XXX: check this corner case */
1535         if (check0 == 0)
1536           check0 = 0x00ff;
1537         else
1538           check0--;
1539       }
1540       check1 -= buffer[i];
1541     } else { /* use check0 -- first byte  */
1542       if ( (short)buffer[i] > check0 ) { /* wrapping */
1543         check0 += 0x100;       /* this is a cheap way to wrap */
1544
1545         /* if we're wrapping, decrement the other one */
1546         /* XXX: check this corner case */
1547         if (check1 == 0)
1548           check1 = 0x00ff;
1549         else
1550           check1--;
1551       }
1552       check0 -= buffer[i];
1553     }
1554   }
1555
1556   if (check0 > 0xff || check1 > 0xff)  {
1557     /* they shouldn't be able to do this. error! */
1558     faimdprintf(sess, 2, "check0 or check1 is too high: 0x%04x, 0x%04x\n", check0, check1);
1559     return -1;
1560   }
1561
1562   /* grab just the lowest byte; this should be clean, but just in
1563      case */
1564   check0 &= 0xff;
1565   check1 &= 0xff;
1566
1567   *checksum = ((check0 * 0x1000000) + (check1 * 0x10000));
1568   return *checksum;
1569 #endif
1570 }
1571
1572 #if 0
1573 /**
1574  * aim_oft_buildheader - fills a buffer with network-order fh data
1575  * @dest: buffer to fill -- pre-alloced
1576  * @fh: fh to get data from
1577  *
1578  * returns length written; -1 on error.
1579  * DOES NOT DO BOUNDS CHECKING!
1580  *
1581  */
1582 static int oft_buildheader(unsigned char *dest, struct aim_fileheader_t *fh)
1583 {
1584   int i, curbyte;
1585   if (!dest || !fh)
1586     return -1;
1587   curbyte = 0;
1588   for(i = 0; i < 8; i++)
1589     curbyte += aimutil_put8(dest+curbyte, fh->bcookie[i]);
1590   curbyte += aimutil_put16(dest+curbyte, fh->encrypt);
1591   curbyte += aimutil_put16(dest+curbyte, fh->compress);
1592   curbyte += aimutil_put16(dest+curbyte, fh->totfiles);
1593   curbyte += aimutil_put16(dest+curbyte, fh->filesleft);
1594   curbyte += aimutil_put16(dest+curbyte, fh->totparts);
1595   curbyte += aimutil_put16(dest+curbyte, fh->partsleft);
1596   curbyte += aimutil_put32(dest+curbyte, fh->totsize);
1597   curbyte += aimutil_put32(dest+curbyte, fh->size);
1598   curbyte += aimutil_put32(dest+curbyte, fh->modtime);
1599   curbyte += aimutil_put32(dest+curbyte, fh->checksum);
1600   curbyte += aimutil_put32(dest+curbyte, fh->rfrcsum);
1601   curbyte += aimutil_put32(dest+curbyte, fh->rfsize);
1602   curbyte += aimutil_put32(dest+curbyte, fh->cretime);
1603   curbyte += aimutil_put32(dest+curbyte, fh->rfcsum);
1604   curbyte += aimutil_put32(dest+curbyte, fh->nrecvd);
1605   curbyte += aimutil_put32(dest+curbyte, fh->recvcsum);
1606   memcpy(dest+curbyte, fh->idstring, 32);
1607   curbyte += 32;
1608   curbyte += aimutil_put8(dest+curbyte, fh->flags);
1609   curbyte += aimutil_put8(dest+curbyte, fh->lnameoffset);
1610   curbyte += aimutil_put8(dest+curbyte, fh->lsizeoffset);
1611   memcpy(dest+curbyte, fh->dummy, 69);
1612   curbyte += 69;
1613   memcpy(dest+curbyte, fh->macfileinfo, 16);
1614   curbyte += 16;
1615   curbyte += aimutil_put16(dest+curbyte, fh->nencode);
1616   curbyte += aimutil_put16(dest+curbyte, fh->nlanguage);
1617   memset(dest+curbyte, 0x00, 64);
1618   memcpy(dest+curbyte, fh->name, 64);
1619
1620   /* XXX: Filenames longer than 64B  */
1621   curbyte += 64;
1622   return curbyte;
1623 }
1624 #endif
1625
1626 /**
1627  * aim_getfile_intitiate - Request an OFT getfile session
1628  * @sess: your session,
1629  * @conn: the BOS conn,
1630  * @destsn is the SN to connect to.
1631  *
1632  * returns a new &aim_conn_t on success, %NULL on error
1633  */
1634 faim_export aim_conn_t *aim_getfile_initiate(aim_session_t *sess, aim_conn_t *conn, const char *destsn)
1635 {
1636         return NULL;
1637 #if 0
1638   struct command_tx_struct *newpacket;
1639   struct aim_conn_t *newconn;
1640   struct aim_filetransfer_priv *priv;
1641   struct aim_msgcookie_t *cookie;
1642   int curbyte, i, listenfd;
1643   short port = 4443;
1644   struct hostent *hptr;
1645   struct utsname myname;
1646   char cap[16];
1647   char d[4];
1648
1649   /* Open our socket */
1650
1651   if ( (listenfd = aim_listenestablish(port)) == -1)
1652     return NULL;
1653
1654   /* get our local IP */
1655
1656   if (uname(&myname) < 0)
1657     return NULL;
1658   if ( (hptr = gethostbyname(myname.nodename)) == NULL)
1659     return NULL;
1660   memcpy(&d, hptr->h_addr_list[0], 4);
1661
1662   aim_putcap(cap, 16, AIM_CAPS_GETFILE);
1663
1664   /* create the OSCAR packet */
1665
1666   if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+8+2+1+strlen(destsn)+4+4+0x42)))
1667     return NULL;
1668   newpacket->lock = 1;
1669
1670   /* lock struct */
1671   curbyte = 0;
1672   curbyte += aim_putsnac(newpacket->data+curbyte, 0x0004, 0x0006, 0x0000, sess->snac_nextid);
1673
1674   /* XXX: check the cookie before commiting to using it */
1675
1676   /* Generate a random message cookie
1677    * This cookie needs to be alphanumeric and NULL-terminated to be TOC-compatible. */
1678   for (i=0; i<7; i++)
1679     curbyte += aimutil_put8(newpacket->data+curbyte, 0x30 + ((u_char) random() % 10));
1680
1681   curbyte += aimutil_put8(newpacket->data+curbyte, 0x00);
1682
1683   /* grab all the data for cookie caching. */
1684
1685   if (!(cookie = (struct aim_msgcookie_t *)calloc(1, sizeof(struct aim_msgcookie_t))))
1686     return NULL;
1687   memcpy(cookie->cookie, newpacket->data+curbyte-8, 8);
1688   cookie->type = AIM_COOKIETYPE_OFTGET;
1689
1690   if (!(priv = (struct aim_filetransfer_priv *)calloc(1, sizeof(struct aim_filetransfer_priv))))
1691     return NULL;
1692   memcpy(priv->cookie, cookie, 8);
1693   memcpy(priv->sn, destsn, sizeof(priv->sn));
1694   memcpy(priv->fh.name, "listing.txt", strlen("listing.txt"));
1695   priv->state = 1;
1696
1697   cookie->data = priv;
1698
1699   aim_cachecookie(sess, cookie);
1700
1701   /* Channel ID */
1702   curbyte += aimutil_put16(newpacket->data+curbyte,0x0002);
1703
1704   /* Destination SN (prepended with byte length) */
1705   curbyte += aimutil_put8(newpacket->data+curbyte,strlen(destsn));
1706   curbyte += aimutil_putstr(newpacket->data+curbyte, destsn, strlen(destsn));
1707   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0003);
1708   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
1709
1710   /* enTLV start */
1711   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0005);
1712   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0042);
1713
1714   /* Flag data / ICBM Parameters? */
1715   curbyte += aimutil_put8(newpacket->data+curbyte, 0x00);
1716   curbyte += aimutil_put8(newpacket->data+curbyte, 0x00);
1717
1718   /* Cookie */
1719   curbyte += aimutil_putstr(newpacket->data+curbyte, (char *)cookie, 8);
1720
1721   /* Capability String */
1722   curbyte += aimutil_putstr(newpacket->data+curbyte, (char *)cap, 0x10);
1723
1724   /* 000a/0002 : 0001 */
1725   curbyte += aimutil_put16(newpacket->data+curbyte, 0x000a);
1726   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002);
1727   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0001);
1728
1729   /* 0003/0004: IP address */
1730   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0003);
1731   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0004);
1732   for(i = 0; i < 4; i++)
1733     curbyte += aimutil_put8(newpacket->data+curbyte, d[i]);
1734
1735   /* already in network byte order  */
1736
1737   /* 0005/0002: Port */
1738   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0005);
1739   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0002);
1740   curbyte += aimutil_put16(newpacket->data+curbyte, port);
1741
1742   /* 000f/0000: ?? */
1743   curbyte += aimutil_put16(newpacket->data+curbyte, 0x000f);
1744   curbyte += aimutil_put16(newpacket->data+curbyte, 0x0000);
1745
1746   /* 2711/000c: ?? */
1747   curbyte += aimutil_put16(newpacket->data+curbyte, 0x2711);
1748   curbyte += aimutil_put16(newpacket->data+curbyte, 0x000c);
1749   curbyte += aimutil_put32(newpacket->data+curbyte, 0x00120001);
1750
1751   for(i = 0; i < 0x000c - 4; i++)
1752     curbyte += aimutil_put8(newpacket->data+curbyte, 0x00);
1753
1754   newpacket->commandlen = curbyte;
1755   newpacket->lock = 0;
1756   aim_tx_enqueue(sess, newpacket);
1757
1758   /* allocate and set up our connection */
1759
1760   i = fcntl(listenfd, F_GETFL, 0);
1761   fcntl(listenfd, F_SETFL, i | O_NONBLOCK);
1762   newconn = aim_newconn(sess, AIM_CONN_TYPE_RENDEZVOUS_OUT, NULL);
1763
1764   if (!newconn){
1765     perror("aim_newconn");
1766     return NULL;
1767   }
1768
1769   newconn->fd = listenfd;
1770   newconn->subtype = AIM_CONN_SUBTYPE_OFT_GETFILE;
1771   newconn->priv = priv;
1772   faimdprintf(sess, 2,"faim: listening (fd = %d, unconnected)\n", newconn->fd);
1773
1774   return newconn;
1775 #endif
1776 }
1777
1778 /**
1779  * aim_oft_getfile_request - request a particular file over an established getfile connection
1780  * @sess: your session
1781  * @conn: the established OFT getfile connection
1782  * @name: filename to request
1783  * @size: size of the file
1784  *
1785  *
1786  * returns -1 on error, 0 on successful enqueuing
1787  */
1788 faim_export int aim_oft_getfile_request(aim_session_t *sess, aim_conn_t *conn, const char *name, int size)
1789 {
1790         return -EINVAL;
1791 #if 0
1792   struct command_tx_struct *newoft;
1793   struct aim_filetransfer_priv *ft;
1794   if (!sess || !conn || !conn->priv || !name)
1795     return -1;
1796
1797   if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x120c, 0))) {
1798     faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n");
1799     return -1;
1800   }
1801
1802   newoft->lock = 1;
1803
1804   memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1805   newoft->hdr.oft.hdr2len = 0x100 - 8;
1806
1807   ft = (struct aim_filetransfer_priv *)conn->priv;
1808   ft->fh.filesleft = 1;
1809   ft->fh.totfiles = 1;
1810   ft->fh.totparts = 1;
1811   ft->fh.partsleft = 1;
1812   ft->fh.totsize = size;
1813   ft->fh.size = size;
1814   ft->fh.checksum = 0;
1815   memcpy(ft->fh.name, name, strlen(name));
1816   memset(ft->fh.name+strlen(name), 0, 1);
1817
1818   if (!(newoft->hdr.oft.hdr2 = (unsigned char *)calloc(1,newoft->hdr.oft.hdr2len))) {
1819     newoft->lock = 0;
1820     aim_frame_destroy(newoft);
1821     return -1;
1822   }
1823
1824   if (!(aim_oft_buildheader(newoft->hdr.oft.hdr2, &(ft->fh)))) {
1825     newoft->lock = 0;
1826     aim_frame_destroy(newoft);
1827     return -1;
1828   }
1829
1830   newoft->lock = 0;
1831
1832   aim_tx_enqueue(sess, newoft);
1833   return 0;
1834 #endif
1835 }
1836
1837 /**
1838  * aim_oft_getfile_ack - acknowledge a getfile download as complete
1839  * @sess: your session
1840  * @conn: the getfile conn to send the ack over
1841  *
1842  * Call this function after you have read all the data in a particular
1843  * filetransfer. Returns -1 on error, 0 on apparent success
1844  *
1845  */
1846 faim_export int aim_oft_getfile_ack(aim_session_t *sess, aim_conn_t *conn)
1847 {
1848         return -EINVAL;
1849 #if 0
1850   struct command_tx_struct *newoft;
1851   struct aim_filetransfer_priv *ft;
1852
1853   if (!sess || !conn || !conn->priv)
1854     return -1;
1855
1856   if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0202, 0))) {
1857     faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n");
1858     return -1;
1859   }
1860
1861   newoft->lock = 1;
1862
1863   memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1864   newoft->hdr.oft.hdr2len = 0x100-8;
1865
1866  if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) {
1867    newoft->lock = 0;
1868    aim_frame_destroy(newoft);
1869    return -1;
1870  }
1871
1872  ft = (struct aim_filetransfer_priv *)conn->priv;
1873
1874  if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) {
1875    newoft->lock = 0;
1876    aim_frame_destroy(newoft);
1877    return -1;
1878  }
1879
1880  newoft->lock = 0;
1881  aim_tx_enqueue(sess, newoft);
1882  return 0;
1883 #endif
1884 }
1885
1886 /**
1887  * aim_oft_getfile_end - end a getfile.
1888  * @sess: your session
1889  * @conn: the getfile connection
1890  *
1891  * call this before you close the getfile connection if you're on the
1892  * receiving/requesting end.
1893  */
1894 faim_export int aim_oft_getfile_end(aim_session_t *sess, aim_conn_t *conn)
1895 {
1896         return -EINVAL;
1897 #if 0
1898   struct command_tx_struct *newoft;
1899   struct aim_filetransfer_priv *ft;
1900
1901   if (!sess || !conn || !conn->priv)
1902     return -1;
1903
1904   if (!(newoft = aim_tx_new(sess, conn, AIM_FRAMETYPE_OFT, 0x0204, 0))) {
1905     faimdprintf(sess, 2, "faim: aim_accepttransfer: tx_new OFT failed\n");
1906     return -1;
1907   }
1908
1909   newoft->lock = 1;
1910
1911   memcpy(newoft->hdr.oft.magic, "OFT2", 4);
1912   newoft->hdr.oft.hdr2len = 0x100 - 8;
1913
1914   if (!(newoft->hdr.oft.hdr2 = (char *)calloc(1,newoft->hdr.oft.hdr2len))) {
1915     newoft->lock = 0;
1916     aim_frame_destroy(newoft);
1917     return -1;
1918   }
1919
1920   ft = (struct aim_filetransfer_priv *)conn->priv;
1921   ft->state = 4; /* no longer wanting data */
1922   ft->fh.nrecvd = ft->fh.size;
1923   ft->fh.recvcsum = ft->fh.checksum;
1924   ft->fh.flags = 0x21;
1925
1926   if (!(aim_oft_buildheader((unsigned char *)newoft->hdr.oft.hdr2, &(ft->fh)))) {
1927     newoft->lock = 0;
1928     aim_frame_destroy(newoft);
1929     return -1;
1930   }
1931
1932   newoft->lock = 0;
1933   aim_tx_enqueue(sess, newoft);
1934
1935   return 0;
1936 #endif /* 0 */
1937 }
1938