X-Git-Url: http://andersk.mit.edu/gitweb/libfaim.git/blobdiff_plain/5b79dc938f4e84b913b53d35aa229e54f041252d..00ef5271216e3bea9b233ce26a3c0f21fbca931f:/utils/faimtest/faimtest.c diff --git a/utils/faimtest/faimtest.c b/utils/faimtest/faimtest.c index 853922c..96d993d 100644 --- a/utils/faimtest/faimtest.c +++ b/utils/faimtest/faimtest.c @@ -23,10 +23,10 @@ * please contact me at the address below. * * Most everything: - * (c) 1998 Adam Fritzler, PST, afritz@iname.com + * (c) 1998 Adam Fritzler, PST, mid@zigamoprh.net * * The password algorithms - * (c) 1998 Brock Wilcox, awwaiid@iname.com + * (c) 1998 Brock Wilcox, awwaiid@zigamorph.net * * THERE IS NO CODE FROM AOL'S AIM IN THIS CODE, NOR * WAS THERE ANY DISASSEMBLAGE TO DEFINE PROTOCOL. All @@ -38,13 +38,39 @@ * */ -/* - Current status: - +#include "faimtest.h" - */ +static char *dprintf_ctime(void) +{ + static char retbuf[64]; + struct tm *lt; + struct timeval tv; + struct timezone tz; + + gettimeofday(&tv, &tz); + lt = localtime((time_t *)&tv.tv_sec); + strftime(retbuf, 64, "%a %b %e %H:%M:%S %Z %Y", lt); + return retbuf; +} -#include +#define DPRINTF_OUTSTREAM stdout +#define dprintf(x) { \ + fprintf(DPRINTF_OUTSTREAM, "%s %s: " x, dprintf_ctime(), "faimtest"); \ + fflush(DPRINTF_OUTSTREAM); \ +} +#define dvprintf(x, y...) { \ + fprintf(DPRINTF_OUTSTREAM, "%s %s: " x, dprintf_ctime(), "faimtest", y); \ + fflush(DPRINTF_OUTSTREAM); \ +} +#define dinlineprintf(x) { \ + fprintf(DPRINTF_OUTSTREAM, x); \ + fflush(DPRINTF_OUTSTREAM); \ +} +#define dvinlineprintf(x, y...) { \ + fprintf(DPRINTF_OUTSTREAM, x, y); \ + fflush(DPRINTF_OUTSTREAM); \ +} +#define dperror(x) dvprintf("%s: %s\n", x, strerror(errno)); int faimtest_parse_oncoming(struct aim_session_t *, struct command_rx_struct *, ...); int faimtest_parse_offgoing(struct aim_session_t *, struct command_rx_struct *, ...); @@ -53,10 +79,11 @@ int faimtest_parse_authresp(struct aim_session_t *, struct command_rx_struct *, int faimtest_parse_incoming_im(struct aim_session_t *, struct command_rx_struct *command, ...); int faimtest_parse_userinfo(struct aim_session_t *, struct command_rx_struct *command, ...); int faimtest_handleredirect(struct aim_session_t *, struct command_rx_struct *command, ...); -int faimtest_authsvrready(struct aim_session_t *, struct command_rx_struct *command, ...); -int faimtest_pwdchngdone(struct aim_session_t *, struct command_rx_struct *command, ...); +int faimtest_infochange(struct aim_session_t *sess, struct command_rx_struct *command, ...); int faimtest_serverready(struct aim_session_t *, struct command_rx_struct *command, ...); +int faimtest_hostversions(struct aim_session_t *sess, struct command_rx_struct *command, ...); int faimtest_parse_misses(struct aim_session_t *, struct command_rx_struct *command, ...); +int faimtest_parse_msgack(struct aim_session_t *, struct command_rx_struct *command, ...); int faimtest_parse_motd(struct aim_session_t *, struct command_rx_struct *command, ...); int faimtest_parse_login(struct aim_session_t *, struct command_rx_struct *command, ...); int faimtest_chatnav_info(struct aim_session_t *, struct command_rx_struct *command, ...); @@ -64,159 +91,578 @@ int faimtest_chat_incomingmsg(struct aim_session_t *sess, struct command_rx_stru int faimtest_chat_infoupdate(struct aim_session_t *sess, struct command_rx_struct *command, ...); int faimtest_chat_leave(struct aim_session_t *sess, struct command_rx_struct *command, ...); int faimtest_chat_join(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_connerr(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_debugconn_connect(struct aim_session_t *sess, struct command_rx_struct *command, ...); + +int faimtest_directim_request(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_directim_initiate(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_directim_connect(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_directim_incoming(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_directim_disconnect(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_directim_typing(struct aim_session_t *sess, struct command_rx_struct *command, ...); + +int faimtest_getfile_filereq(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_filesend(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_complete(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_disconnect(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_initiate(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_listing(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_listingreq(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_receive(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_getfile_state4(struct aim_session_t *sess, struct command_rx_struct *command, ...); + +int faimtest_parse_ratechange(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_evilnotify(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_searcherror(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_searchreply(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_msgerr(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_buddyrights(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_locerr(struct aim_session_t *sess, struct command_rx_struct *command, ...); +int faimtest_parse_genericerr(struct aim_session_t *sess, struct command_rx_struct *command, ...); + +static char *msgerrreasons[] = { + "Invalid error", + "Invalid SNAC", + "Rate to host", + "Rate to client", + "Not logged on", + "Service unavailable", + "Service not defined", + "Obsolete SNAC", + "Not supported by host", + "Not supported by client", + "Refused by client", + "Reply too big", + "Responses lost", + "Request denied", + "Busted SNAC payload", + "Insufficient rights", + "In local permit/deny", + "Too evil (sender)", + "Too evil (receiver)", + "User temporarily unavailable", + "No match", + "List overflow", + "Request ambiguous", + "Queue full", + "Not while on AOL"}; +static int msgerrreasonslen = 25; static char *screenname,*password,*server=NULL; +static char *proxy = NULL, *proxyusername = NULL, *proxypass = NULL; +static char *ohcaptainmycaptain = NULL; +static int connected = 0; + +struct aim_session_t aimsess; +int keepgoing = 1; -int main(void) +static FILE *listingfile; +static char *listingpath; + +static void faimtest_debugcb(struct aim_session_t *sess, int level, const char *format, va_list va) { - struct aim_session_t aimsess; - struct aim_conn_t *authconn = NULL, *waitingconn = NULL; - int keepgoing = 1, stayconnected = 1; - struct client_info_s info = {"FAIMtest (Hi guys!)", 3, 5, 1670, "us", "en"}; - int selstat = 0; - aim_session_init(&aimsess); + vfprintf(stderr, format, va); - if ( !(screenname = getenv("SCREENNAME")) || - !(password = getenv("PASSWORD"))) - { - printf("Must specify SCREENAME and PASSWORD in environment.\n"); - return -1; + return; +} + +int faimtest_reportinterval(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + unsigned short interval = 0; + + va_start(ap, command); + interval = va_arg(ap, int); + va_end(ap); + + dvprintf("aim: minimum report interval: %d (seconds?)\n", interval); + + return 1; +} + +int faimtest_flapversion(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + + dvprintf("faimtest: using FLAP version %u\n", aimutil_get32(command->data)); + +#if 0 + /* + * This is an alternate location for starting the login process. + */ + /* XXX should do more checking to make sure its really the right AUTH conn */ + if (command->conn->type == AIM_CONN_TYPE_AUTH) { + /* do NOT send a connack/flapversion, request_login will send it if needed */ + aim_request_login(sess, command->conn, screenname); + dprintf("faimtest: login request sent\n"); + } +#endif + + return 1; +} + +/* + * This is a frivilous callback. You don't need it. I only used it for + * debugging non-blocking connects. + * + * If packets are sent to a conn before its fully connected, they + * will be queued and then transmitted when the connection completes. + * + */ +int faimtest_conncomplete(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + va_end(ap); + + if (conn) + dvprintf("faimtest: connection on %d completed\n", conn->fd); + + return 1; +} + +#ifdef _WIN32 +/* + * This is really all thats needed to link against libfaim on win32. + * + * Note that this particular version of faimtest has never been tested + * on win32, but I'm fairly sure it should. + */ +int initwsa(void) +{ + WORD wVersionRequested; + WSADATA wsaData; + + wVersionRequested = MAKEWORD(2,2); + return WSAStartup(wVersionRequested, &wsaData); +} +#endif /* _WIN32 */ + +int faimtest_init(void) +{ + struct aim_conn_t *stdinconn = NULL; + + if (!(stdinconn = aim_newconn(&aimsess, 0, NULL))) { + dprintf("unable to create connection for stdin!\n"); + return -1; + } + + stdinconn->fd = STDIN_FILENO; + + return 0; +} + +int logout(void) +{ + + if (ohcaptainmycaptain) + aim_send_im(&aimsess, aim_getconn_type(&aimsess, AIM_CONN_TYPE_BOS), ohcaptainmycaptain, 0, "ta ta..."); + + aim_session_kill(&aimsess); + + if (faimtest_init() == -1) + dprintf("faimtest_init failed\n"); + + return 0; +} + +int login(const char *sn, const char *passwd) +{ + struct aim_conn_t *authconn; + + if (sn) + screenname = strdup(sn); + if (passwd) + password = strdup(passwd); + + if (proxy) + aim_setupproxy(&aimsess, proxy, proxyusername, proxypass); + + if (!screenname || !password) { + dprintf("need SN and password\n"); + return -1; + } + + if (!(authconn = aim_newconn(&aimsess, AIM_CONN_TYPE_AUTH, server?server:FAIM_LOGIN_SERVER))) { + dprintf("faimtest: internal connection error while in aim_login. bailing out.\n"); + return -1; + } else if (authconn->fd == -1) { + if (authconn->status & AIM_CONN_STATUS_RESOLVERR) { + dprintf("faimtest: could not resolve authorizer name\n"); + } else if (authconn->status & AIM_CONN_STATUS_CONNERR) { + dprintf("faimtest: could not connect to authorizer\n"); } + aim_conn_kill(&aimsess, &authconn); + return -1; + } + aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_FLAPVER, faimtest_flapversion, 0); + aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); + aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0007, faimtest_parse_login, 0); + aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0003, faimtest_parse_authresp, 0); + + aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_DEBUGCONN_CONNECT, faimtest_debugconn_connect, 0); + + /* If the connection is in progress, this will just be queued */ + aim_request_login(&aimsess, authconn, screenname); + dprintf("faimtest: login request sent\n"); + + return 0; +} + +int main(int argc, char **argv) +{ + struct aim_conn_t *waitingconn = NULL; + int i; + int selstat = 0; + static int faimtest_mode = 0; + + screenname = getenv("SCREENNAME"); + password = getenv("PASSWORD"); server = getenv("AUTHSERVER"); + proxy = getenv("SOCKSPROXY"); + proxyusername = getenv("SOCKSNAME"); + proxypass = getenv("SOCKSPASS"); + + listingpath = getenv("LISTINGPATH"); + + while ((i = getopt(argc, argv, "u:p:a:U:P:A:l:c:hoO")) != EOF) { + switch (i) { + case 'u': screenname = optarg; break; + case 'p': password = optarg; break; + case 'a': server = optarg; break; + case 'U': proxyusername = optarg; break; + case 'P': proxypass = optarg; break; + case 'A': proxy = optarg; break; + case 'l': listingpath = optarg; break; + case 'c': ohcaptainmycaptain = optarg; break; + case 'o': faimtest_mode = 1; break; /* half old interface */ + case 'O': faimtest_mode = 2; break; /* full old interface */ + case 'h': + default: + printf("faimtest\n"); + printf(" Options: \n"); + printf(" -u name Screen name ($SCREENNAME)\n"); + printf(" -p passwd Password ($PASSWORD)\n"); + printf(" -a host:port Authorizer ($AUTHSERVER)\n"); + printf(" -U name Proxy user name ($SOCKSPROXY)\n"); + printf(" -P passwd Proxy password ($SOCKSNAME)\n"); + printf(" -A host:port Proxy host ($SOCKSPASS)\n"); + printf(" -l path Path to listing file ($LISTINGPATH)\n"); + printf(" -c name Screen name of owner\n"); + printf(" -o Login at startup, then prompt\n"); + printf(" -O Login, never give prompt\n"); + exit(0); + } + } - /* - * (I used a goto-based loop here because n wanted quick proof - * that reconnecting without restarting was actually possible...) - */ - enter: - authconn = aim_newconn(&aimsess, AIM_CONN_TYPE_AUTH, server?server:FAIM_LOGIN_SERVER); +#ifdef _WIN32 + if (initwsa() != 0) { + dprintf("faimtest: could not initialize windows sockets\n"); + return -1; + } +#endif /* _WIN32 */ - if (authconn == NULL) - { - fprintf(stderr, "faimtest: internal connection error while in aim_login. bailing out.\n"); - return -1; + /* Pass zero as flags if you want blocking connects */ + aim_session_init(&aimsess, AIM_SESS_FLAGS_NONBLOCKCONNECT, 1); + aim_setdebuggingcb(&aimsess, faimtest_debugcb); /* still needed even if debuglevel = 0 ! */ + + if(listingpath) { + char *listingname; + if(!(listingname = (char *)calloc(1, strlen(listingpath)+strlen("/listing.txt")))) { + dperror("listingname calloc"); + exit(-1); } - else if (authconn->fd == -1) - { - if (authconn->status & AIM_CONN_STATUS_RESOLVERR) - fprintf(stderr, "faimtest: could not resolve authorizer name\n"); - else if (authconn->status & AIM_CONN_STATUS_CONNERR) - fprintf(stderr, "faimtest: could not connect to authorizer\n"); - return -1; + sprintf(listingname, "%s/listing.txt", listingpath); + if( (listingfile = fopen(listingname, "r")) == NULL) { + dvprintf("Couldn't open %s... disabling that shit.\n", listingname); } - else - { -#ifdef SNACLOGIN - /* new login code -- not default -- pending new password encryption algo */ - aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0007, faimtest_parse_login, 0); - aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0003, faimtest_parse_authresp, 0); - - aim_sendconnack(&aimsess, authconn); - aim_request_login(&aimsess, authconn, FAIMTEST_SCREENNAME); -#else - aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_AUTHSUCCESS, faimtest_parse_authresp, 0); - aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SERVERREADY, faimtest_authsvrready, 0); - aim_send_login(&aimsess, authconn, screenname, password, &info); - -#endif + + free(listingname); + } + + faimtest_init(); + + if (faimtest_mode < 2) + cmd_init(); + + if (faimtest_mode >= 1) { + if (login(screenname, password) == -1) { + if (faimtest_mode < 2) + cmd_uninit(); + exit(-1); } + } while (keepgoing) { waitingconn = aim_select(&aimsess, NULL, &selstat); - switch(selstat) { - case -1: /* error */ + if (selstat == -1) { /* error */ + keepgoing = 0; /* fall through */ + } else if (selstat == 0) { /* no events pending */ keepgoing = 0; - break; - - case 0: /* no events pending */ - break; - - case 1: /* outgoing data pending */ + } else if (selstat == 1) { /* outgoing data pending */ aim_tx_flushqueue(&aimsess); - break; - - case 2: /* incoming data pending */ - if (aim_get_command(&aimsess, waitingconn) < 0) { - printf("\afaimtest: connection error!\n"); - } else - aim_rxdispatch(&aimsess); - break; - - default: - break; /* invalid */ + } else if (selstat == 2) { /* incoming data pending */ + if ((faimtest_mode < 2) && (waitingconn->fd == STDIN_FILENO)) { + cmd_gotkey(); + } else { + if (waitingconn->type == AIM_CONN_TYPE_RENDEZVOUS_OUT) { + if (aim_handlerendconnect(&aimsess, waitingconn) < 0) { + dprintf("connection error (rend out)\n"); + aim_conn_kill(&aimsess, &waitingconn); + } + } else { + if (aim_get_command(&aimsess, waitingconn) >= 0) { + aim_rxdispatch(&aimsess); + } else { + dvprintf("connection error (type 0x%04x:0x%04x)\n", waitingconn->type, waitingconn->subtype); + /* we should have callbacks for all these, else the library will do the conn_kill for us. */ + if(waitingconn->type == AIM_CONN_TYPE_RENDEZVOUS) { + dprintf("connection error: rendezvous connection. you forgot register a disconnect callback, right?\n"); + aim_conn_kill(&aimsess, &waitingconn); + } else + aim_conn_kill(&aimsess, &waitingconn); + if (!aim_getconn_type(&aimsess, AIM_CONN_TYPE_BOS)) { + dprintf("major connection error\n"); + if (faimtest_mode == 2) + break; + } + } + } + } } } - /* Close up */ - printf("AIM just decided we didn't need to be here anymore, closing up...\n"); - /* close up all connections, dead or no */ - aim_logoff(&aimsess); + aim_session_kill(&aimsess); - if (stayconnected) { - printf("\nTrying to reconnect in 2 seconds...\n"); - sleep(2); - goto enter; - } + if (faimtest_mode < 2) { + printf("\n"); + cmd_uninit(); + } /* Get out */ exit(0); } +int faimtest_rateresp(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + + switch(command->conn->type) { + case AIM_CONN_TYPE_BOS: { + /* this is the new buddy list */ + char buddies[128]; + /* this is the new profile */ + char profile[256]; + + /* Caution: Buddy1 and Buddy2 are real people! (who I don't know) */ + snprintf(buddies, sizeof(buddies), "Buddy1&Buddy2&%s&", ohcaptainmycaptain?ohcaptainmycaptain:"blah"); + snprintf(profile, sizeof(profile), "Hello.
My captain is %s. They were dumb enough to leave this message in their client, or they are using faimtest. Shame on them.", ohcaptainmycaptain); + + aim_bos_ackrateresp(sess, command->conn); /* ack rate info response */ + aim_bos_reqpersonalinfo(sess, command->conn); + aim_bos_reqlocaterights(sess, command->conn); + aim_bos_setprofile(sess, command->conn, profile, NULL, AIM_CAPS_BUDDYICON | AIM_CAPS_CHAT | AIM_CAPS_VOICE | AIM_CAPS_GETFILE | AIM_CAPS_SENDFILE | AIM_CAPS_IMIMAGE | AIM_CAPS_GAMES | AIM_CAPS_SAVESTOCKS); + aim_bos_reqbuddyrights(sess, command->conn); + + /* send the buddy list and profile (required, even if empty) */ + aim_bos_setbuddylist(sess, command->conn, buddies); + + /* dont really know what this does */ + aim_addicbmparam(sess, command->conn); + aim_bos_reqicbmparaminfo(sess, command->conn); + + aim_bos_reqrights(sess, command->conn); + /* set group permissions -- all user classes */ + aim_bos_setgroupperm(sess, command->conn, AIM_FLAG_ALLUSERS); + aim_bos_setprivacyflags(sess, command->conn, AIM_PRIVFLAGS_ALLOWIDLE|AIM_PRIVFLAGS_ALLOWMEMBERSINCE); + + break; + } + case AIM_CONN_TYPE_AUTH: + aim_bos_ackrateresp(sess, command->conn); + aim_auth_clientready(sess, command->conn); + dprintf("faimtest: connected to authorization/admin service\n"); + break; + + default: + dvprintf("faimtest: got rate response for unhandled connection type %04x\n", command->conn->type); + break; + } + + return 1; +} + +static int faimtest_icbmparaminfo(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + unsigned long defflags, minmsginterval; + unsigned short maxicbmlen, maxsenderwarn, maxrecverwarn, maxchannel; + va_list ap; + + va_start(ap, command); + maxchannel = va_arg(ap, unsigned short); + defflags = va_arg(ap, unsigned long); + maxicbmlen = va_arg(ap, unsigned short); + maxsenderwarn = va_arg(ap, unsigned short); + maxrecverwarn = va_arg(ap, unsigned short); + minmsginterval = va_arg(ap, unsigned long); + va_end(ap); + + dvprintf("ICBM Parameters: maxchannel = %d, default flags = 0x%08lx, max msg len = %d, max sender evil = %f, max reciever evil = %f, min msg interval = %ld\n", maxchannel, defflags, maxicbmlen, ((float)maxsenderwarn)/10.0, ((float)maxrecverwarn)/10.0, minmsginterval); + + return 1; +} + +int faimtest_hostversions(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + int vercount, i; + unsigned char *versions; + va_list ap; + + va_start(ap, command); + vercount = va_arg(ap, int); /* number of family/version pairs */ + versions = va_arg(ap, unsigned char *); + va_end(ap); + + dprintf("faimtest: SNAC versions supported by this host: "); + for (i = 0; i < vercount*4; i += 4) + dvinlineprintf("0x%04x:0x%04x ", + aimutil_get16(versions+i), /* SNAC family */ + aimutil_get16(versions+i+2) /* Version number */); + dinlineprintf("\n"); + + return 1; +} + +int faimtest_accountconfirm(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + int status; + va_list ap; + + va_start(ap, command); + status = va_arg(ap, int); /* status code of confirmation request */ + va_end(ap); + + dvprintf("account confirmation returned status 0x%04x (%s)\n", status, (status==0x0000)?"email sent":"unknown"); + + return 1; +} + int faimtest_serverready(struct aim_session_t *sess, struct command_rx_struct *command, ...) { - switch (command->conn->type) - { - case AIM_CONN_TYPE_BOS: + int famcount, i; + unsigned short *families; + va_list ap; - aim_bos_reqrate(sess, command->conn); /* request rate info */ - aim_bos_ackrateresp(sess, command->conn); /* ack rate info response -- can we say timing? */ - aim_bos_setprivacyflags(sess, command->conn, 0x00000003); - -#if 0 - aim_bos_reqpersonalinfo(sess, command->conn); -#endif - - /* Request advertisement service -- see comment in handleredirect */ - aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_ADS); - aim_setversions(sess, command->conn); + va_start(ap, command); + famcount = va_arg(ap, int); + families = va_arg(ap, unsigned short *); + va_end(ap); -#if 0 - aim_bos_reqrights(sess, command->conn); - aim_bos_reqbuddyrights(sess, command->conn); - aim_bos_reqlocaterights(sess, command->conn); - aim_bos_reqicbmparaminfo(sess, command->conn); -#endif - - /* set group permissions */ - aim_bos_setgroupperm(sess, command->conn, 0x1f); - fprintf(stderr, "faimtest: done with BOS ServerReady\n"); - break; + dvprintf("faimtest: SNAC families supported by this host (type %d): ", command->conn->type); + for (i = 0; i < famcount; i++) + dvinlineprintf("0x%04x ", families[i]); + dinlineprintf("\n"); - case AIM_CONN_TYPE_CHATNAV: - fprintf(stderr, "faimtest: chatnav: got server ready\n"); - aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CTN, AIM_CB_CTN_INFO, faimtest_chatnav_info, 0); - aim_bos_reqrate(sess, command->conn); - aim_bos_ackrateresp(sess, command->conn); - aim_chatnav_clientready(sess, command->conn); - aim_chatnav_reqrights(sess, command->conn); + switch (command->conn->type) { + case AIM_CONN_TYPE_AUTH: + aim_auth_setversions(sess, command->conn); + aim_bos_reqrate(sess, command->conn); /* request rate info */ + + dprintf("faimtest: done with auth ServerReady\n"); + break; + + case AIM_CONN_TYPE_BOS: + + aim_setversions(sess, command->conn); + aim_bos_reqrate(sess, command->conn); /* request rate info */ + + dprintf("faimtest: done with BOS ServerReady\n"); + break; + + case AIM_CONN_TYPE_CHATNAV: + dprintf("faimtest: chatnav: got server ready\n"); + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CTN, AIM_CB_CTN_INFO, faimtest_chatnav_info, 0); + aim_bos_reqrate(sess, command->conn); + aim_bos_ackrateresp(sess, command->conn); + aim_chatnav_clientready(sess, command->conn); + aim_chatnav_reqrights(sess, command->conn); + + break; + + case AIM_CONN_TYPE_CHAT: + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERJOIN, faimtest_chat_join, 0); + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERLEAVE, faimtest_chat_leave, 0); + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_ROOMINFOUPDATE, faimtest_chat_infoupdate, 0); + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_INCOMINGMSG, faimtest_chat_incomingmsg, 0); + aim_bos_reqrate(sess, command->conn); + aim_bos_ackrateresp(sess, command->conn); + aim_chat_clientready(sess, command->conn); + break; + + case AIM_CONN_TYPE_RENDEZVOUS: /* empty */ + break; + + default: + dvprintf("faimtest: unknown connection type on Host Online (0x%04x)\n", command->conn->type); + } + + return 1; +} + +int faimtest_parse_buddyrights(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + unsigned short maxbuddies, maxwatchers; + + va_start(ap, command); + maxbuddies = va_arg(ap, int); + maxwatchers = va_arg(ap, int); + va_end(ap); + + dvprintf("faimtest: buddy list rights: Max buddies = %d / Max watchers = %d\n", maxbuddies, maxwatchers); + + return 1; +} + +int faimtest_bosrights(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + unsigned short maxpermits, maxdenies; + va_list ap; + + va_start(ap, command); + maxpermits = va_arg(ap, int); + maxdenies = va_arg(ap, int); + va_end(ap); + + dvprintf("faimtest: BOS rights: Max permit = %d / Max deny = %d\n", maxpermits, maxdenies); + + aim_bos_clientready(sess, command->conn); + + dprintf("faimtest: officially connected to BOS.\n"); + + return 1; +} + +int faimtest_parse_unknown(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + int i = 0; + + if (!sess || !command) + return 1; + + dprintf("\nReceived unknown packet:"); + for (i = 0; i < command->commandlen; i++) { + if ((i % 8) == 0) + dinlineprintf("\n\t"); + dvinlineprintf("0x%2x ", command->data[i]); + } + dinlineprintf("\n\n"); - break; - case AIM_CONN_TYPE_CHAT: - aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERJOIN, faimtest_chat_join, 0); - aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERLEAVE, faimtest_chat_leave, 0); - aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_ROOMINFOUPDATE, faimtest_chat_infoupdate, 0); - aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_INCOMINGMSG, faimtest_chat_incomingmsg, 0); - aim_bos_reqrate(sess, command->conn); - aim_bos_ackrateresp(sess, command->conn); - aim_chat_clientready(sess, command->conn); - break; - default: - fprintf(stderr, "faimtest: unknown connection type on Server Ready\n"); - } return 1; } @@ -240,48 +686,54 @@ int faimtest_handleredirect(struct aim_session_t *sess, struct command_rx_struct va_list ap; int serviceid; char *ip; - char *cookie; - - /* this is the new buddy list */ - char buddies[] = "Buddy1&Buddy2&ThisHereIsAName2&"; - /* this is the new profile */ - char profile[] = "Hello"; + unsigned char *cookie; va_start(ap, command); serviceid = va_arg(ap, int); ip = va_arg(ap, char *); - cookie = va_arg(ap, char *); + cookie = va_arg(ap, unsigned char *); switch(serviceid) { - case 0x0005: /* Advertisements */ - /* - * The craziest explanation yet as to why we finish logging in when - * we get the advertisements redirect, of which we don't use anyway.... - * IT WAS EASY! - */ - - /* send the buddy list and profile (required, even if empty) */ - aim_bos_setbuddylist(sess, command->conn, buddies); - aim_bos_setprofile(sess, command->conn, profile, NULL, AIM_CAPS_CHAT); - - /* send final login command (required) */ - aim_bos_clientready(sess, command->conn); /* tell BOS we're ready to go live */ + case 0x0005: /* Adverts */ + { + struct aim_conn_t *tstconn; - /* you should now be ready to go */ - printf("\nYou are now officially online.\n"); + tstconn = aim_newconn(sess, AIM_CONN_TYPE_ADS, ip); + if ((tstconn==NULL) || (tstconn->status & AIM_CONN_STATUS_RESOLVERR)) { + dprintf("faimtest: unable to reconnect with authorizer\n"); + } else { + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_FLAPVER, faimtest_flapversion, 0); + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); + aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0); + aim_conn_addhandler(sess, tstconn, 0x0001, 0x0007, faimtest_rateresp, 0); /* rate info */ + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_GEN, 0x0018, faimtest_hostversions, 0); + aim_auth_sendcookie(sess, tstconn, cookie); + dprintf("sent cookie to adverts host\n"); + } + } break; case 0x0007: /* Authorizer */ { struct aim_conn_t *tstconn; /* Open a connection to the Auth */ tstconn = aim_newconn(sess, AIM_CONN_TYPE_AUTH, ip); - if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR) ) - fprintf(stderr, "faimtest: unable to reconnect with authorizer\n"); - else + if ((tstconn==NULL) || (tstconn->status & AIM_CONN_STATUS_RESOLVERR)) { + dprintf("faimtest: unable to reconnect with authorizer\n"); + } else { + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_FLAPVER, faimtest_flapversion, 0); + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); + aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0); + aim_conn_addhandler(sess, tstconn, 0x0001, 0x0007, faimtest_rateresp, 0); /* rate info */ + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_GEN, 0x0018, faimtest_hostversions, 0); + aim_conn_addhandler(sess, tstconn, 0x0007, 0x0007, faimtest_accountconfirm, 0); + aim_conn_addhandler(sess, tstconn, 0x0007, 0x0003, faimtest_infochange, 0); + aim_conn_addhandler(sess, tstconn, 0x0007, 0x0005, faimtest_infochange, 0); /* Send the cookie to the Auth */ aim_auth_sendcookie(sess, tstconn, cookie); + dprintf("sent cookie to authorizer host\n"); + } } break; @@ -289,34 +741,35 @@ int faimtest_handleredirect(struct aim_session_t *sess, struct command_rx_struct { struct aim_conn_t *tstconn = NULL; tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHATNAV, ip); - if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR)) - { - fprintf(stderr, "faimtest: unable to connect to chatnav server\n"); - return 1; - } -#if 0 - aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_CTN, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0); - aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_GEN, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0); -#endif + if ( (tstconn==NULL) || (tstconn->status & AIM_CONN_STATUS_RESOLVERR)) { + dprintf("faimtest: unable to connect to chatnav server\n"); + if (tstconn) aim_conn_kill(sess, &tstconn); + return 1; + } + aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0); + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); aim_auth_sendcookie(sess, tstconn, cookie); - fprintf(stderr, "\achatnav: connected\n"); + dprintf("\achatnav: connected\n"); } break; case 0x000e: /* Chat */ { char *roomname = NULL; + int exchange; struct aim_conn_t *tstconn = NULL; roomname = va_arg(ap, char *); + exchange = va_arg(ap, int); tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHAT, ip); - if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR)) + if ( (tstconn==NULL) || (tstconn->status & AIM_CONN_STATUS_RESOLVERR)) { - fprintf(stderr, "faimtest: unable to connect to chat server\n"); + dprintf("faimtest: unable to connect to chat server\n"); + if (tstconn) aim_conn_kill(sess, &tstconn); return 1; } - printf("faimtest: chat: connected\n"); + dvprintf("faimtest: chat: connected to %s on exchange %d\n", roomname, exchange); /* * We must do this to attach the stored name to the connection! @@ -324,11 +777,12 @@ int faimtest_handleredirect(struct aim_session_t *sess, struct command_rx_struct aim_chat_attachname(tstconn, roomname); aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0); + aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); aim_auth_sendcookie(sess, tstconn, cookie); } break; default: - printf("uh oh... got redirect for unknown service 0x%04x!!\n", serviceid); + dvprintf("uh oh... got redirect for unknown service 0x%04x!!\n", serviceid); /* dunno */ } @@ -339,126 +793,306 @@ int faimtest_handleredirect(struct aim_session_t *sess, struct command_rx_struct int faimtest_parse_authresp(struct aim_session_t *sess, struct command_rx_struct *command, ...) { + va_list ap; struct aim_conn_t *bosconn = NULL; - + char *sn = NULL, *bosip = NULL, *errurl = NULL, *email = NULL; + unsigned char *cookie = NULL; + int errorcode = 0, regstatus = 0; + int latestbuild = 0, latestbetabuild = 0; + char *latestrelease = NULL, *latestbeta = NULL; + char *latestreleaseurl = NULL, *latestbetaurl = NULL; + char *latestreleaseinfo = NULL, *latestbetainfo = NULL; + + va_start(ap, command); + sn = va_arg(ap, char *); + errorcode = va_arg(ap, int); + errurl = va_arg(ap, char *); + regstatus = va_arg(ap, int); + email = va_arg(ap, char *); + bosip = va_arg(ap, char *); + cookie = va_arg(ap, unsigned char *); + + latestrelease = va_arg(ap, char *); + latestbuild = va_arg(ap, int); + latestreleaseurl = va_arg(ap, char *); + latestreleaseinfo = va_arg(ap, char *); + + latestbeta = va_arg(ap, char *); + latestbetabuild = va_arg(ap, int); + latestbetaurl = va_arg(ap, char *); + latestbetainfo = va_arg(ap, char *); + + va_end(ap); - printf("Screen name: %s\n", sess->logininfo.screen_name); + dvprintf("Screen name: %s\n", sn); /* * Check for error. */ - if (sess->logininfo.errorcode) - { - printf("Login Error Code 0x%04x\n", sess->logininfo.errorcode); - printf("Error URL: %s\n", sess->logininfo.errorurl); - aim_conn_close(command->conn); - exit(0); /* XXX: should return in order to let the above things get free()'d. */ - } + if (errorcode || !bosip || !cookie) { + dvprintf("Login Error Code 0x%04x\n", errorcode); + dvprintf("Error URL: %s\n", errurl); + aim_conn_kill(sess, &command->conn); + return 1; + } - printf("Reg status: %2d\n", sess->logininfo.regstatus); - printf("Email: %s\n", sess->logininfo.email); - printf("BOS IP: %s\n", sess->logininfo.BOSIP); + dvprintf("Reg status: %2d\n", regstatus); + dvprintf("Email: %s\n", email); + dvprintf("BOS IP: %s\n", bosip); + + if (latestbeta) + dvprintf("Latest beta version: %s, build %d, at %s (more info at %s)\n", latestbeta, latestbetabuild, latestbetaurl, latestbetainfo); + + if (latestrelease) + dvprintf("Latest released version: %s, build %d, at %s (more info at %s)\n", latestrelease, latestbuild, latestreleaseurl, latestreleaseinfo); + + dprintf("Closing auth connection...\n"); + aim_conn_kill(sess, &command->conn); + if (!(bosconn = aim_newconn(sess, AIM_CONN_TYPE_BOS, bosip))) { + dprintf("faimtest: could not connect to BOS: internal error\n"); + return 1; + } else if (bosconn->status & AIM_CONN_STATUS_CONNERR) { + dprintf("faimtest: could not connect to BOS\n"); + aim_conn_kill(sess, &bosconn); + return 1; + } + + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNCOMPLETE, faimtest_conncomplete, 0); + aim_conn_addhandler(sess, bosconn, 0x0009, 0x0003, faimtest_bosrights, 0); + aim_conn_addhandler(sess, bosconn, 0x0001, 0x0007, faimtest_rateresp, 0); /* rate info */ + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ACK, AIM_CB_ACK_ACK, NULL, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, 0x0018, faimtest_hostversions, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SERVERREADY, faimtest_serverready, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATEINFO, NULL, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_REDIRECT, faimtest_handleredirect, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_STS, AIM_CB_STS_SETREPORTINTERVAL, faimtest_reportinterval, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_RIGHTSINFO, faimtest_parse_buddyrights, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_ONCOMING, faimtest_parse_oncoming, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_OFFGOING, faimtest_parse_offgoing, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_INCOMING, faimtest_parse_incoming_im, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_ERROR, faimtest_parse_locerr, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_MISSEDCALL, faimtest_parse_misses, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATECHANGE, faimtest_parse_ratechange, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_EVIL, faimtest_parse_evilnotify, 0); + aim_conn_addhandler(sess, bosconn, 0x000a, 0x0001, faimtest_parse_searcherror, 0); + aim_conn_addhandler(sess, bosconn, 0x000a, 0x0003, faimtest_parse_searchreply, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_ERROR, faimtest_parse_msgerr, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_USERINFO, faimtest_parse_userinfo, 0); + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_ACK, faimtest_parse_msgack, 0); + + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_MOTD, faimtest_parse_motd, 0); + + aim_conn_addhandler(sess, bosconn, 0x0004, 0x0005, faimtest_icbmparaminfo, 0); + aim_conn_addhandler(sess, bosconn, 0x0001, 0x0001, faimtest_parse_genericerr, 0); + aim_conn_addhandler(sess, bosconn, 0x0003, 0x0001, faimtest_parse_genericerr, 0); + aim_conn_addhandler(sess, bosconn, 0x0009, 0x0001, faimtest_parse_genericerr, 0); + + aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNERR, faimtest_parse_connerr, 0); + + + aim_auth_sendcookie(sess, bosconn, cookie); - printf("Closing auth connection...\n"); - aim_conn_close(command->conn); - bosconn = aim_newconn(sess, AIM_CONN_TYPE_BOS, sess->logininfo.BOSIP); - if (bosconn == NULL) - { - fprintf(stderr, "faimtest: could not connect to BOS: internal error\n"); - } - else if (bosconn->status != 0) - { - fprintf(stderr, "faimtest: could not connect to BOS\n"); - } - else - { - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ACK, AIM_CB_ACK_ACK, NULL, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SERVERREADY, faimtest_serverready, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATEINFO, NULL, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_REDIRECT, faimtest_handleredirect, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_STS, AIM_CB_STS_SETREPORTINTERVAL, NULL, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_ONCOMING, faimtest_parse_oncoming, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_OFFGOING, faimtest_parse_offgoing, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_INCOMING, faimtest_parse_incoming_im, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_ERROR, faimtest_parse_misses, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_MISSEDCALL, faimtest_parse_misses, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATECHANGE, faimtest_parse_misses, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_ERROR, faimtest_parse_misses, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_USERINFO, faimtest_parse_userinfo, 0); - - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_CTN, AIM_CB_CTN_DEFAULT, aim_parse_unknown, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0); - aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_MOTD, faimtest_parse_motd, 0); - aim_auth_sendcookie(sess, bosconn, sess->logininfo.cookie); - } return 1; } +static void printuserflags(unsigned short flags) +{ + if (flags & AIM_FLAG_UNCONFIRMED) + dinlineprintf("UNCONFIRMED "); + if (flags & AIM_FLAG_ADMINISTRATOR) + dinlineprintf("ADMINISTRATOR "); + if (flags & AIM_FLAG_AOL) + dinlineprintf("AOL "); + if (flags & AIM_FLAG_OSCAR_PAY) + dinlineprintf("OSCAR_PAY "); + if (flags & AIM_FLAG_FREE) + dinlineprintf("FREE "); + if (flags & AIM_FLAG_AWAY) + dinlineprintf("AWAY "); + if (flags & AIM_FLAG_UNKNOWN40) + dinlineprintf("ICQ? "); + if (flags & AIM_FLAG_UNKNOWN80) + dinlineprintf("UNKNOWN80 "); + return; +} + int faimtest_parse_userinfo(struct aim_session_t *sess, struct command_rx_struct *command, ...) { struct aim_userinfo_s *userinfo; char *prof_encoding = NULL; char *prof = NULL; + unsigned short inforeq = 0; va_list ap; va_start(ap, command); userinfo = va_arg(ap, struct aim_userinfo_s *); prof_encoding = va_arg(ap, char *); prof = va_arg(ap, char *); + inforeq = va_arg(ap, int); va_end(ap); - printf("faimtest: userinfo: sn: %s\n", userinfo->sn); - printf("faimtest: userinfo: warnlevel: 0x%04x\n", userinfo->warnlevel); - printf("faimtest: userinfo: class: 0x%04x = ", userinfo->class); - - /* - * 00000000 (binary) - * 1 Trial - * 2 Unknown - * 3 AOL - * 4 Unknown - * 5 Free - * - * ORed together. - * - */ - - if (userinfo->class & 0x0001) - printf("TRIAL "); - if (userinfo->class & 0x0002) - printf("UNKNOWN_BIT2 "); - if (userinfo->class & 0x0004) - printf("AOL "); - if (userinfo->class & 0x0008) - printf("UNKNOWN_BIT4 "); - if (userinfo->class & 0x0010) - printf("FREE "); - printf("\n"); + dvprintf("faimtest: userinfo: sn: %s\n", userinfo->sn); + dvprintf("faimtest: userinfo: warnlevel: 0x%04x\n", userinfo->warnlevel); + dvprintf("faimtest: userinfo: flags: 0x%04x = ", userinfo->flags); + printuserflags(userinfo->flags); + dinlineprintf("\n"); - printf("faimtest: userinfo: membersince: %lu\n", userinfo->membersince); - printf("faimtest: userinfo: onlinesince: %lu\n", userinfo->onlinesince); - printf("faimtest: userinfo: idletime: 0x%04x\n", userinfo->idletime); + dvprintf("faimtest: userinfo: membersince: %lu\n", userinfo->membersince); + dvprintf("faimtest: userinfo: onlinesince: %lu\n", userinfo->onlinesince); + dvprintf("faimtest: userinfo: idletime: 0x%04x\n", userinfo->idletime); - printf("faimtest: userinfo: profile_encoding: %s\n", prof_encoding ? prof_encoding : "[none]"); - printf("faimtest: userinfo: prof: %s\n", prof ? prof : "[none]"); + if (inforeq == AIM_GETINFO_GENERALINFO) { + dvprintf("faimtest: userinfo: profile_encoding: %s\n", prof_encoding ? prof_encoding : "[none]"); + dvprintf("faimtest: userinfo: prof: %s\n", prof ? prof : "[none]"); + } else if (inforeq == AIM_GETINFO_AWAYMESSAGE) { + dvprintf("faimtest: userinfo: awaymsg_encoding: %s\n", prof_encoding ? prof_encoding : "[none]"); + dvprintf("faimtest: userinfo: awaymsg: %s\n", prof ? prof : "[none]"); + } else + dprintf("faimtest: userinfo: unknown info request\n"); return 1; } +static int faimtest_handlecmd(struct aim_session_t *sess, struct command_rx_struct *command, struct aim_userinfo_s *userinfo, char *tmpstr) +{ + + if (!strncmp(tmpstr, "disconnect", 10)) { + + logout(); + + } else if (strstr(tmpstr, "goodday")) { + + aim_send_im(sess, command->conn, userinfo->sn, AIM_IMFLAGS_ACK, "Good day to you too."); + + } else if (strstr(tmpstr, "warnme")) { + + dprintf("faimtest: icbm: sending non-anon warning\n"); + aim_send_warning(sess, command->conn, userinfo->sn, 0); + + } else if (strstr(tmpstr, "anonwarn")) { + + dprintf("faimtest: icbm: sending anon warning\n"); + aim_send_warning(sess, command->conn, userinfo->sn, AIM_WARN_ANON); + + } else if (strstr(tmpstr, "setdirectoryinfo")) { + + dprintf("faimtest: icbm: sending backwards profile data\n"); + aim_setdirectoryinfo(sess, command->conn, "tsrif", "elddim", "tsal", "nediam", "emankcin", "teerts", "ytic", "etats", "piz", 0, 1); + + } else if (strstr(tmpstr, "setinterests")) { + + dprintf("faimtest: icbm: setting fun interests\n"); + aim_setuserinterests(sess, command->conn, "interest1", "interest2", "interest3", "interest4", "interest5", 1); + + } else if (!strncmp(tmpstr, "getfile", 7)) { + + if (!ohcaptainmycaptain) { + + aim_send_im(sess, command->conn, userinfo->sn, AIM_IMFLAGS_ACK, "I have no owner!"); + + } else { + struct aim_conn_t *newconn; + + newconn = aim_getfile_initiate(sess, command->conn, (strlen(tmpstr) < 8)?ohcaptainmycaptain:tmpstr+8); + dvprintf("faimtest: getting file listing from %s\n", (strlen(tmpstr) < 8)?ohcaptainmycaptain:tmpstr+8); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEINITIATE, faimtest_getfile_initiate,0); + } + + } else if (!strncmp(tmpstr, "open chatnav", 12)) { + + aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_CHATNAV); + + } else if (!strncmp(tmpstr, "create", 6)) { + + aim_chatnav_createroom(sess,aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV), (strlen(tmpstr) < 7)?"WorldDomination":tmpstr+7, 0x0004); + + } else if (!strncmp(tmpstr, "close chatnav", 13)) { + struct aim_conn_t *chatnavconn; + + chatnavconn = aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV); + aim_conn_kill(sess, &chatnavconn); + + } else if (!strncmp(tmpstr, "join", 4)) { + + aim_chat_join(sess, command->conn, 0x0004, "worlddomination"); + + } else if (!strncmp(tmpstr, "leave", 5)) { + + aim_chat_leaveroom(sess, "worlddomination"); + + } else if (!strncmp(tmpstr, "getinfo", 7)) { + + aim_getinfo(sess, command->conn, "75784102", AIM_GETINFO_GENERALINFO); + aim_getinfo(sess, command->conn, "15853637", AIM_GETINFO_AWAYMESSAGE); + aim_getinfo(sess, command->conn, "midendian", AIM_GETINFO_GENERALINFO); + aim_getinfo(sess, command->conn, "midendian", AIM_GETINFO_AWAYMESSAGE); + + } else if (!strncmp(tmpstr, "open directim", 13)) { + struct aim_conn_t *newconn; + + printf("faimtest: opening directim to %s\n", (strlen(tmpstr) < 14)?userinfo->sn:tmpstr+14); + newconn = aim_directim_initiate(sess, command->conn, NULL, (strlen(tmpstr) < 14)?userinfo->sn:tmpstr+14); + if(!newconn || newconn->fd == -1) + printf("connection failed!\n"); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINITIATE, faimtest_directim_initiate,0); + + } else if(!(strncmp(tmpstr, "lookup", 6))) { + + aim_usersearch_address(sess, command->conn, tmpstr+7); + + } else if (!strncmp(tmpstr, "reqsendmsg", 10)) { + + aim_send_im(sess, command->conn, ohcaptainmycaptain, 0, "sendmsg 7900"); + + } else if (!strncmp(tmpstr, "reqauth", 7)) { + + aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_AUTH); + + } else if (!strncmp(tmpstr, "reqconfirm", 10)) { + + aim_auth_reqconfirm(sess, aim_getconn_type(sess, AIM_CONN_TYPE_AUTH)); + + } else if (!strncmp(tmpstr, "reqemail", 8)) { + + aim_auth_getinfo(sess, aim_getconn_type(sess, AIM_CONN_TYPE_AUTH), 0x0011); + + } else if (!strncmp(tmpstr, "changepass", 8)) { + + aim_auth_changepasswd(sess, aim_getconn_type(sess, AIM_CONN_TYPE_AUTH), "NEWPASSWORD", "OLDPASSWORD"); + + } else if (!strncmp(tmpstr, "setemail", 8)) { + + aim_auth_setemail(sess, aim_getconn_type(sess, AIM_CONN_TYPE_AUTH), "NEWEMAILADDRESS"); + + } else if (!strncmp(tmpstr, "sendmsg", 7)) { + int i; + i = atoi(tmpstr+8); + if (i < 10000) { + char *newbuf; + int z; + + newbuf = malloc(i+1); + for (z = 0; z < i; z++) { + newbuf[z] = (z % 10)+0x30; + } + newbuf[i] = '\0'; + aim_send_im(sess, command->conn, userinfo->sn, 0, newbuf); + free(newbuf); + } + + } else { + + dprintf("unknown command.\n"); + aim_add_buddy(sess, command->conn, userinfo->sn); + + } + + return 0; +} + /* * The user-level Incoming ICBM callback. * - * Arguments: - * struct command_rx_struct * command if you feel like doing it yourself - * char * srcsn the source name - * char * msg message - * int warnlevel warning/evil level - * int class user class - * ulong membersince time_t of date of signup - * ulong onsince time_t of date of singon - * int idletime min (sec?) idle - * u_int icbmflags sets AIM_IMFLAGS_{AWAY,ACK} - * */ int faimtest_parse_incoming_im(struct aim_session_t *sess, struct command_rx_struct *command, ...) { @@ -471,194 +1105,351 @@ int faimtest_parse_incoming_im(struct aim_session_t *sess, struct command_rx_str /* * Channel 1: Standard Message */ - if (channel == 1) - { - struct aim_userinfo_s *userinfo; - char *msg = NULL; - u_int icbmflags = 0; - char *tmpstr = NULL; - u_short flag1, flag2; - + if (channel == 1) { + struct aim_userinfo_s *userinfo; + char *msg = NULL; + u_int icbmflags = 0; + char *tmpstr = NULL; + unsigned short flag1, flag2; + int finlen = 0; + unsigned char *fingerprint = NULL; + int clienttype = AIM_CLIENTTYPE_UNKNOWN; + + userinfo = va_arg(ap, struct aim_userinfo_s *); + msg = va_arg(ap, char *); + icbmflags = va_arg(ap, u_int); + flag1 = va_arg(ap, int); + flag2 = va_arg(ap, int); + finlen = va_arg(ap, int); + fingerprint = va_arg(ap, unsigned char *); + va_end(ap); + + clienttype = aim_fingerprintclient(fingerprint, finlen); + + dvprintf("faimtest: icbm: sn = \"%s\"\n", userinfo->sn); + dvprintf("faimtest: icbm: probable client type: %d\n", clienttype); + dvprintf("faimtest: icbm: warnlevel = 0x%04x\n", userinfo->warnlevel); + dvprintf("faimtest: icbm: flags = 0x%04x = ", userinfo->flags); + printuserflags(userinfo->flags); + dinlineprintf("\n"); + + dvprintf("faimtest: icbm: membersince = %lu\n", userinfo->membersince); + dvprintf("faimtest: icbm: onlinesince = %lu\n", userinfo->onlinesince); + dvprintf("faimtest: icbm: idletime = 0x%04x\n", userinfo->idletime); + dvprintf("faimtest: icbm: capabilities = 0x%04x\n", userinfo->capabilities); + + dprintf("faimtest: icbm: icbmflags = "); + if (icbmflags & AIM_IMFLAGS_AWAY) + dinlineprintf("away "); + if (icbmflags & AIM_IMFLAGS_ACK) + dinlineprintf("ackrequest "); + dinlineprintf("\n"); + + dvprintf("faimtest: icbm: encoding flags = {%04x, %04x}\n", flag1, flag2); + + dvprintf("faimtest: icbm: message: %s\n", msg); + + if (msg) { + int i = 0; + + while (msg[i] == '<') { + if (msg[i] == '<') { + while (msg[i] != '>') + i++; + i++; + } + } + tmpstr = msg+i; + + faimtest_handlecmd(sess, command, userinfo, tmpstr); + + } + } + /* + * Channel 2: Rendevous Request + */ + else if (channel == 2) { + struct aim_userinfo_s *userinfo; + unsigned short reqclass; + + reqclass = va_arg(ap, int); + switch (reqclass) { + case AIM_CAPS_VOICE: { userinfo = va_arg(ap, struct aim_userinfo_s *); - msg = va_arg(ap, char *); - icbmflags = va_arg(ap, u_int); - flag1 = va_arg(ap, u_short); - flag2 = va_arg(ap, u_short); va_end(ap); - printf("faimtest: icbm: sn = \"%s\"\n", userinfo->sn); - printf("faimtest: icbm: warnlevel = 0x%04x\n", userinfo->warnlevel); - printf("faimtest: icbm: class = 0x%04x ", userinfo->class); - if (userinfo->class & 0x0010) - printf("(FREE) "); - if (userinfo->class & 0x0001) - printf("(TRIAL) "); - if (userinfo->class & 0x0004) - printf("(AOL) "); - printf("\n"); - printf("faimtest: icbm: membersince = %lu\n", userinfo->membersince); - printf("faimtest: icbm: onlinesince = %lu\n", userinfo->onlinesince); - printf("faimtest: icbm: idletime = 0x%04x\n", userinfo->idletime); + dvprintf("faimtest: voice invitation: source sn = %s\n", userinfo->sn); + dvprintf("faimtest: voice invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel); + dvprintf("faimtest: voice invitation: \tclass = 0x%04x = ", userinfo->flags); + printuserflags(userinfo->flags); + dinlineprintf("\n"); + + /* we dont get membersince on chat invites! */ + dvprintf("faimtest: voice invitation: \tonlinesince = %lu\n", userinfo->onlinesince); + dvprintf("faimtest: voice invitation: \tidletime = 0x%04x\n", userinfo->idletime); - printf("faimtest: icbm: icbmflags = "); - if (icbmflags & AIM_IMFLAGS_AWAY) - printf("away "); - if (icbmflags & AIM_IMFLAGS_ACK) - printf("ackrequest "); - printf("\n"); + break; + } + case AIM_CAPS_GETFILE: { + char *ip, *cookie; + struct aim_conn_t *newconn; + struct aim_fileheader_t *fh; + + userinfo = va_arg(ap, struct aim_userinfo_s *); + ip = va_arg(ap, char *); + cookie = va_arg(ap, char *); + va_end(ap); - printf("faimtest: icbm: encoding flags = {%04x, %04x}\n", flag1, flag2); + dvprintf("faimtest: get file request from %s (at %s) %x\n", userinfo->sn, ip, reqclass); + + fh = aim_getlisting(sess, listingfile); + + newconn = aim_accepttransfer(sess, command->conn, userinfo->sn, cookie, ip, fh->totfiles, fh->totsize, fh->size, fh->checksum, reqclass); + + if( (!newconn) || (newconn->fd == -1) ) { + dprintf("faimtest: getfile: requestconn: apparent error in accepttransfer\n"); + if(newconn) + aim_conn_kill(sess, &newconn); + break; + } + + free(fh); + + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGREQ, faimtest_getfile_listingreq, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ, faimtest_getfile_filereq, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILESEND, faimtest_getfile_filesend, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILECOMPLETE, faimtest_getfile_complete, 0); + + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEDISCONNECT, faimtest_getfile_disconnect, 0); + + dprintf("faimtest: getfile connect succeeded, handlers added.\n"); + + break; + } + case AIM_CAPS_SENDFILE: { + dprintf("faimtest: send file!\n"); + break; + } + case AIM_CAPS_CHAT: { + char *msg,*encoding,*lang; + struct aim_chat_roominfo *roominfo; - printf("faimtest: icbm: message: %s\n", msg); + userinfo = va_arg(ap, struct aim_userinfo_s *); + roominfo = va_arg(ap, struct aim_chat_roominfo *); + msg = va_arg(ap, char *); + encoding = va_arg(ap, char *); + lang = va_arg(ap, char *); + va_end(ap); - if (msg) - { - tmpstr = index(msg, '>'); - if (tmpstr != NULL) - tmpstr+=1; - else - tmpstr = msg; - - if ( (strlen(tmpstr) >= 10) && - (!strncmp(tmpstr, "disconnect", 10)) ) - { - aim_send_im(sess, command->conn, "midendian", 0, "ta ta..."); - aim_logoff(sess); - } - else if (strstr(tmpstr, "goodday")) - { - printf("faimtest: icbm: sending response\n"); - aim_send_im(sess, command->conn, userinfo->sn, 0, "Good day to you too."); - } - else if (!strncmp(tmpstr, "open chatnav", 12)) - { - aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_CHATNAV); - //aim_chat_join(sess, command->conn, "thishereisaname2_chat85"); - } - else if (!strncmp(tmpstr, "create", 6)) - { - aim_chatnav_createroom(sess, aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV), "WorldDomination", 0x0004); - } - else if (!strncmp(tmpstr, "close chatnav", 13)) - aim_conn_close(aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV)); - else if (!strncmp(tmpstr, "join", 4)) - { - aim_chat_join(sess, command->conn, 0x0004, "worlddomination"); - } - else if (!strncmp(tmpstr, "leave", 5)) - aim_chat_leaveroom(sess, "worlddomination"); - else - { -#if 0 - printf("faimtest: icbm: starting chat...\n"); - aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_CHATNAV); -#else - aim_bos_setidle(sess, command->conn, 0x0ffffffe); -#endif - } - - } + dvprintf("faimtest: chat invitation: source sn = %s\n", userinfo->sn); + dvprintf("faimtest: chat invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel); + dvprintf("faimtest: chat invitation: \tclass = 0x%04x = ", userinfo->flags); + printuserflags(userinfo->flags); + dinlineprintf("\n"); + + /* we dont get membersince on chat invites! */ + dvprintf("faimtest: chat invitation: \tonlinesince = %lu\n", userinfo->onlinesince); + dvprintf("faimtest: chat invitation: \tidletime = 0x%04x\n", userinfo->idletime); + + dvprintf("faimtest: chat invitation: message = %s\n", msg); + dvprintf("faimtest: chat invitation: room name = %s\n", roominfo->name); + dvprintf("faimtest: chat invitation: encoding = %s\n", encoding); + dvprintf("faimtest: chat invitation: language = %s\n", lang); + dvprintf("faimtest: chat invitation: exchange = 0x%04x\n", roominfo->exchange); + dvprintf("faimtest: chat invitation: instance = 0x%04x\n", roominfo->instance); + dvprintf("faimtest: chat invitiation: autojoining %s...\n", roominfo->name); + /* + * Automatically join room... + */ + aim_chat_join(sess, command->conn, 0x0004, roominfo->name); + break; + } + case AIM_CAPS_IMIMAGE: { + struct aim_directim_priv *priv; + struct aim_conn_t *newconn; + + dprintf("faimtest: icbm: rendezvous imimage\n"); + + userinfo = va_arg(ap, struct aim_userinfo_s *); + priv = va_arg(ap, struct aim_directim_priv *); + va_end(ap); + + dvprintf("faimtest: OFT: DirectIM: request from %s (%s)\n", userinfo->sn, priv->ip); + + newconn = aim_directim_connect(sess, command->conn, priv); + + if ( (!newconn) || (newconn->fd == -1) ) { + dprintf("faimtest: icbm: imimage: could not connect\n"); + + if (newconn) + aim_conn_kill(sess, &newconn); + + break; + } + + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINCOMING, faimtest_directim_incoming, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMDISCONNECT, faimtest_directim_disconnect, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMTYPING, faimtest_directim_typing, 0); + + dvprintf("faimtest: OFT: DirectIM: connected to %s\n", userinfo->sn); + + aim_send_im_direct(sess, newconn, "goodday"); + + break; } - /* - * Channel 2: Rendevous Request - */ - else if (channel == 2) - { - struct aim_userinfo_s *userinfo; - int rendtype = 0; - - rendtype = va_arg(ap, int); - if (rendtype == 0) - { - char *msg,*encoding,*lang; - struct aim_chat_roominfo *roominfo; - - userinfo = va_arg(ap, struct aim_userinfo_s *); - roominfo = va_arg(ap, struct aim_chat_roominfo *); - msg = va_arg(ap, char *); - encoding = va_arg(ap, char *); - lang = va_arg(ap, char *); - va_end(ap); - - printf("faimtest: chat invitation: source sn = %s\n", userinfo->sn); - printf("faimtest: chat invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel); - printf("faimtest: chat invitation: \tclass = 0x%04x ", userinfo->class); - if (userinfo->class & 0x0010) - printf("(FREE) "); - if (userinfo->class & 0x0001) - printf("(TRIAL) "); - if (userinfo->class & 0x0004) - printf("(AOL) "); - printf("\n"); - /* we dont get membersince on chat invites! */ - printf("faimtest: chat invitation: \tonlinesince = %lu\n", userinfo->onlinesince); - printf("faimtest: chat invitation: \tidletime = 0x%04x\n", userinfo->idletime); - - printf("faimtest: chat invitation: message = %s\n", msg); - printf("faimtest: chat invitation: room name = %s\n", roominfo->name); - printf("faimtest: chat invitation: encoding = %s\n", encoding); - printf("faimtest: chat invitation: language = %s\n", lang); - printf("faimtest: chat invitation: exchange = 0x%04x\n", roominfo->exchange); - printf("faimtest: chat invitation: instance = 0x%04x\n", roominfo->instance); - printf("faimtest: chat invitiation: autojoining %s...\n", roominfo->name); - /* - * Automatically join room... - */ - aim_chat_join(sess, command->conn, 0x0004, roominfo->name); - } - else if (rendtype == 1) - { - userinfo = va_arg(ap, struct aim_userinfo_s *); - va_end(ap); - - printf("faimtest: voice invitation: source sn = %s\n", userinfo->sn); - printf("faimtest: voice invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel); - printf("faimtest: voice invitation: \tclass = 0x%04x ", userinfo->class); - if (userinfo->class & 0x0010) - printf("(FREE) "); - if (userinfo->class & 0x0001) - printf("(TRIAL) "); - if (userinfo->class & 0x0004) - printf("(AOL) "); - printf("\n"); - /* we dont get membersince on chat invites! */ - printf("faimtest: voice invitation: \tonlinesince = %lu\n", userinfo->onlinesince); - printf("faimtest: voice invitation: \tidletime = 0x%04x\n", userinfo->idletime); - - } - else - printf("faimtest: icbm: unknown rendtype (%d)\n", rendtype); + default: + dvprintf("faimtest: icbm: unknown reqclass (%d)\n", reqclass); + } /* switch */ + } else + dvprintf("faimtest does not support channels > 2 (chan = %02x)\n", channel); + dprintf("faimtest: icbm: done with ICBM handling\n"); + + return 1; +} + +int faimtest_directim_initiate(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_directim_priv *priv; + struct aim_conn_t *newconn, *listenerconn; + + va_start(ap, command); + newconn = va_arg(ap, struct aim_conn_t *); + listenerconn = va_arg(ap, struct aim_conn_t *); + va_end(ap); + + aim_conn_close(listenerconn); + aim_conn_kill(sess, &listenerconn); + + priv = (struct aim_directim_priv *)newconn->priv; + + dvprintf("faimtest: OFT: DirectIM: intitiate success to %s\n", priv->ip); + + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMINCOMING, faimtest_directim_incoming, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMDISCONNECT, faimtest_directim_disconnect, 0); + aim_conn_addhandler(sess, newconn, AIM_CB_FAM_OFT, AIM_CB_OFT_DIRECTIMTYPING, faimtest_directim_typing, 0); + + aim_send_im_direct(sess, newconn, "goodday"); + + dvprintf("faimtest: OFT: DirectIM: connected to %s\n", priv->sn); + + return 1; +} + +int faimtest_directim_connect(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_directim_priv *priv; + + va_start(ap, command); + priv = va_arg(ap, struct aim_directim_priv *); + + va_end(ap); + + dprintf("faimtest: directim_connect\n"); + + return 1; +} + +int faimtest_directim_incoming(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + char *msg = NULL; + struct aim_conn_t *conn; + struct aim_directim_priv *priv; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + msg = va_arg(ap, char *); + va_end(ap); + + if(!(priv = conn->priv)) { + dvprintf("faimtest: directim: no private struct on conn with fd %d\n", conn->fd); + return -1; + } + + dvprintf("faimtest: Directim from %s: %s\n", priv->sn, msg); + if (!strncmp(msg, "sendmsg", 7)) { + int i; + i = atoi(msg+8); + if (i < 10000) { + char *newbuf; + int z; + + newbuf = malloc(i+1); + for (z = 0; z < i; z++) { + newbuf[z] = (z % 10)+0x30; + } + newbuf[i] = '\0'; + aim_send_im_direct(sess, conn, newbuf); + free(newbuf); } - else - printf("faimtest does not support channels > 2 (chan = %02x)\n", channel); - printf("faimtest: icbm: done with ICBM handling\n"); + } else if (!strncmp(msg, "goodday", 7)) { + aim_send_im_direct(sess, conn, "Good day to you, too"); + } else { + char newmsg[1024]; + snprintf(newmsg, sizeof(newmsg), "unknown (%s)\n", msg); + aim_send_im_direct(sess, conn, newmsg); + } + return 1; +} +int faimtest_directim_disconnect(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + char *sn; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + sn = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: directim: disconnected from %s\n", sn); + + aim_conn_kill(sess, &conn); return 1; } -int faimtest_authsvrready(struct aim_session_t *sess, struct command_rx_struct *command, ...) +int faimtest_directim_typing(struct aim_session_t *sess, struct command_rx_struct *command, ...) { - printf("faimtest_authsvrready: called (contype: %d)\n", command->conn->type); - sleep(10); - /* should just be able to tell it we're ready too... */ - aim_auth_clientready(sess, command->conn); + va_list ap; + struct aim_conn_t *conn; + struct aim_directim_priv *priv; -#if 0 - /* - * This is where you'd really begin changing your password. - * However, this callback may get called for reasons other - * than you wanting to change your password. You should - * probably check that before actually doing it. - */ - aim_auth_changepasswd(sess, command->conn, "PWD1", "PWD2"); -#endif + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + va_end(ap); + + if(!(priv = (struct aim_directim_priv *)conn->priv)) { + dvprintf("faimtest: no private struct on conn with fd %d!\n", conn->fd); + return -1; + } + dvprintf("faimtest: ohmigod! %s has started typing (DirectIM). He's going to send you a message! *squeal*\n", priv->sn); return 1; } -int faimtest_pwdchngdone(struct aim_session_t *sess, struct command_rx_struct *command, ...) +int faimtest_infochange(struct aim_session_t *sess, struct command_rx_struct *command, ...) { - printf("PASSWORD CHANGE SUCCESSFUL!!!\n"); + unsigned short change = 0; + int perms, type, length, str; + char *val; + va_list ap; + + va_start(ap, command); + perms = va_arg(ap, int); + type = va_arg(ap, int); + length = va_arg(ap, int); + val = va_arg(ap, char *); + str = va_arg(ap, int); + va_end(ap); + + if (aimutil_get16(command->data+2) == 0x0005) + change = 1; + + dvprintf("info%s: perms = %d, type = %x, length = %d, val = %s\n", change?" change":"", perms, type, length, str?val:"(not string)"); + return 1; } @@ -671,16 +1462,18 @@ int faimtest_parse_oncoming(struct aim_session_t *sess, struct command_rx_struct userinfo = va_arg(ap, struct aim_userinfo_s *); va_end(ap); - printf("\n%s is now online (class: %04x = %s%s%s%s%s%s%s%s)\n", userinfo->sn, userinfo->class, - (userinfo->class&AIM_CLASS_TRIAL)?" TRIAL":"", - (userinfo->class&AIM_CLASS_UNKNOWN2)?" UNKNOWN2":"", - (userinfo->class&AIM_CLASS_AOL)?" AOL":"", - (userinfo->class&AIM_CLASS_UNKNOWN4)?" UNKNOWN4":"", - (userinfo->class&AIM_CLASS_FREE)?" FREE":"", - (userinfo->class&AIM_CLASS_AWAY)?" AWAY":"", - (userinfo->class&AIM_CLASS_UNKNOWN40)?" UNKNOWN40":"", - (userinfo->class&AIM_CLASS_UNKNOWN80)?" UNKNOWN80":""); - + dvprintf("%ld %s is now online (flags: %04x = %s%s%s%s%s%s%s%s) (caps = 0x%04x)\n", + time(NULL), + userinfo->sn, userinfo->flags, + (userinfo->flags&AIM_FLAG_UNCONFIRMED)?" UNCONFIRMED":"", + (userinfo->flags&AIM_FLAG_ADMINISTRATOR)?" ADMINISTRATOR":"", + (userinfo->flags&AIM_FLAG_AOL)?" AOL":"", + (userinfo->flags&AIM_FLAG_OSCAR_PAY)?" OSCAR_PAY":"", + (userinfo->flags&AIM_FLAG_FREE)?" FREE":"", + (userinfo->flags&AIM_FLAG_AWAY)?" AWAY":"", + (userinfo->flags&AIM_FLAG_UNKNOWN40)?" UNKNOWN40":"", + (userinfo->flags&AIM_FLAG_UNKNOWN80)?" UNKNOWN80":"", + userinfo->capabilities); return 1; } @@ -693,84 +1486,125 @@ int faimtest_parse_offgoing(struct aim_session_t *sess, struct command_rx_struct sn = va_arg(ap, char *); va_end(ap); - printf("\n%s has left\n", sn); + dvprintf("\n%s has left\n", sn); return 1; } int faimtest_parse_motd(struct aim_session_t *sess, struct command_rx_struct *command, ...) { + static char *codes[] = { + "Unknown", + "Mandatory upgrade", + "Advisory upgrade", + "System bulletin", + "Top o' the world!"}; + static int codeslen = 5; + char *msg; - u_short id; + unsigned short id; va_list ap; va_start(ap, command); - id = va_arg(ap, u_short); + id = va_arg(ap, int); msg = va_arg(ap, char *); va_end(ap); - printf("faimtest: motd: %s\n", msg); + dvprintf("faimtest: motd: %s (%d / %s)\n", msg, id, + (id < codeslen)?codes[id]:"unknown"); + + if (!connected) + connected++; return 1; } +int faimtest_parse_genericerr(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + unsigned short reason; + + va_start(ap, command); + reason = va_arg(ap, int); + va_end(ap); + + dvprintf("faimtest: snac threw error (reason 0x%04x: %s)\n", reason, (reasondata+0); - subtype= aimutil_get16(command->data+2); + va_list ap; + unsigned short chan, nummissed, reason; + struct aim_userinfo_s *userinfo; - switch (family) - { - case 0x0001: - if (subtype == 0x000a) /* or AIM_CB_RATECHANGE */ - printf("\n****STOP SENDING/RECIEVING MESSAGES SO FAST!****\n\n"); - break; - case 0x0002: - if (subtype == 0x0001) /* or AIM_CB_USERERROR */ - { - u_long snacid = 0x00000000; - - snacid = aimutil_get32(&command->data[6]); - - printf("Received unknown error in SNAC family 0x0002 (snacid = %08lx)\n", snacid); - } - break; - case 0x0004: - if (subtype == 0x0001) /* or AIM_CB_MISSED_IM */ - printf("\n***LAST IM DIDN\'T MAKE IT BECAUSE THE BUDDY IS NOT ONLINE***\n\n"); - else if (subtype == 0x000a) /* or AIM_CB_MISSED_CALL */ - printf("You missed some messages from %s because they were sent too fast\n", &(command->data[13])); - break; - } + va_start(ap, command); + chan = va_arg(ap, int); + userinfo = va_arg(ap, struct aim_userinfo_s *); + nummissed = va_arg(ap, int); + reason = va_arg(ap, int); + va_end(ap); - return 0; + dvprintf("faimtest: missed %d messages from %s (reason %d: %s)\n", nummissed, userinfo->sn, reason, (reasondata[11]; i++) - authcookie[i] = command->data[12+i]; - authcookie[i] = '\0'; + va_start(ap, command); + key = va_arg(ap, char *); + va_end(ap); - printf("faimtest: logincookie: %s\n", authcookie); - - aim_send_login(sess, command->conn, FAIMTEST_SCREENNAME, FAIMTEST_PASSWORD, &info); + aim_send_login(sess, command->conn, screenname, password, &info, key); return 1; } -#endif int faimtest_chat_join(struct aim_session_t *sess, struct command_rx_struct *command, ...) { @@ -783,9 +1617,9 @@ int faimtest_chat_join(struct aim_session_t *sess, struct command_rx_struct *com userinfo = va_arg(ap, struct aim_userinfo_s *); va_end(ap); - printf("faimtest: chat: %s: New occupants have joined:\n", (char *)command->conn->priv); + dvprintf("faimtest: chat: %s: New occupants have joined:\n", (char *)command->conn->priv); while (i < count) - printf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn); + dvprintf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn); return 1; } @@ -801,9 +1635,10 @@ int faimtest_chat_leave(struct aim_session_t *sess, struct command_rx_struct *co userinfo = va_arg(ap, struct aim_userinfo_s *); va_end(ap); - printf("faimtest: chat: %s: Some occupants have left:\n", (char *)command->conn->priv); - while (i < count) - printf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn); + dvprintf("faimtest: chat: %s: Some occupants have left:\n", (char *)command->conn->priv); + + for (i = 0; i < count; ) + dvprintf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn); return 1; } @@ -816,6 +1651,8 @@ int faimtest_chat_infoupdate(struct aim_session_t *sess, struct command_rx_struc char *roomname; int usercount,i; char *roomdesc; + unsigned short unknown_c9, unknown_d2, unknown_d5, maxmsglen; + unsigned long creationtime; va_start(ap, command); roominfo = va_arg(ap, struct aim_chat_roominfo *); @@ -823,21 +1660,31 @@ int faimtest_chat_infoupdate(struct aim_session_t *sess, struct command_rx_struc usercount= va_arg(ap, int); userinfo = va_arg(ap, struct aim_userinfo_s *); roomdesc = va_arg(ap, char *); + unknown_c9 = va_arg(ap, int); + creationtime = va_arg(ap, unsigned long); + maxmsglen = va_arg(ap, int); + unknown_d2 = va_arg(ap, int); + unknown_d5 = va_arg(ap, int); va_end(ap); - printf("faimtest: chat: %s: info update:\n", (char *)command->conn->priv); - printf("faimtest: chat: %s: \tRoominfo: {%04x, %s, %04x}\n", + dvprintf("faimtest: chat: %s: info update:\n", (char *)command->conn->priv); + dvprintf("faimtest: chat: %s: \tRoominfo: {%04x, %s, %04x}\n", (char *)command->conn->priv, roominfo->exchange, roominfo->name, roominfo->instance); - printf("faimtest: chat: %s: \tRoomname: %s\n", (char *)command->conn->priv, roomname); - printf("faimtest: chat: %s: \tRoomdesc: %s\n", (char *)command->conn->priv, roomdesc); - printf("faimtest: chat: %s: \tOccupants: (%d)\n", (char *)command->conn->priv, usercount); + dvprintf("faimtest: chat: %s: \tRoomname: %s\n", (char *)command->conn->priv, roomname); + dvprintf("faimtest: chat: %s: \tRoomdesc: %s\n", (char *)command->conn->priv, roomdesc); + dvprintf("faimtest: chat: %s: \tOccupants: (%d)\n", (char *)command->conn->priv, usercount); - i = 0; - while (i < usercount) - printf("faimtest: chat: %s: \t\t%s\n", (char *)command->conn->priv, userinfo[i++].sn); + for (i = 0; i < usercount; ) + dvprintf("faimtest: chat: %s: \t\t%s\n", (char *)command->conn->priv, userinfo[i++].sn); + + dvprintf("faimtest: chat: %s: \tUnknown_c9: 0x%04x\n", (char *)command->conn->priv, unknown_c9); + dvprintf("faimtest: chat: %s: \tCreation time: %lu (time_t)\n", (char *)command->conn->priv, creationtime); + dvprintf("faimtest: chat: %s: \tMax message length: %d bytes\n", (char *)command->conn->priv, maxmsglen); + dvprintf("faimtest: chat: %s: \tUnknown_d2: 0x%04x\n", (char *)command->conn->priv, unknown_d2); + dvprintf("faimtest: chat: %s: \tUnknown_d5: 0x%02x\n", (char *)command->conn->priv, unknown_d5); return 1; } @@ -854,12 +1701,12 @@ int faimtest_chat_incomingmsg(struct aim_session_t *sess, struct command_rx_stru msg = va_arg(ap, char *); va_end(ap); - printf("faimtest: chat: %s: incoming msg from %s: %s\n", (char *)command->conn->priv, userinfo->sn, msg); + dvprintf("faimtest: chat: %s: incoming msg from %s: %s\n", (char *)command->conn->priv, userinfo->sn, msg); /* * Do an echo for testing purposes. But not for ourselves ("oops!") */ - if (strcmp(userinfo->sn, sess->logininfo.screen_name) != 0) + if (strcmp(userinfo->sn, sess->sn) != 0) { sprintf(tmpbuf, "(%s said \"%s\")", userinfo->sn, msg); aim_chat_send_im(sess, command->conn, tmpbuf); @@ -870,44 +1717,545 @@ int faimtest_chat_incomingmsg(struct aim_session_t *sess, struct command_rx_stru int faimtest_chatnav_info(struct aim_session_t *sess, struct command_rx_struct *command, ...) { - u_short type; + unsigned short type; va_list ap; - ap = va_start(ap, command); - type = va_arg(ap, u_short); + va_start(ap, command); + type = va_arg(ap, int); + + switch(type) { + case 0x0002: { + int maxrooms; + struct aim_chat_exchangeinfo *exchanges; + int exchangecount,i = 0; + + maxrooms = va_arg(ap, int); + exchangecount = va_arg(ap, int); + exchanges = va_arg(ap, struct aim_chat_exchangeinfo *); + va_end(ap); + + dprintf("faimtest: chat info: Chat Rights:\n"); + dvprintf("faimtest: chat info: \tMax Concurrent Rooms: %d\n", maxrooms); + + dvprintf("faimtest: chat info: \tExchange List: (%d total)\n", exchangecount); + for (i = 0; i < exchangecount; i++) { + dvprintf("faimtest: chat info: \t\t%x: %s (%s/%s)\n", + exchanges[i].number, + exchanges[i].name, + exchanges[i].charset1, + exchanges[i].lang1); + } + + } + break; + case 0x0008: { + char *fqcn, *name, *ck; + unsigned short instance, flags, maxmsglen, maxoccupancy, unknown, exchange; + unsigned char createperms; + unsigned long createtime; + + fqcn = va_arg(ap, char *); + instance = va_arg(ap, int); + exchange = va_arg(ap, int); + flags = va_arg(ap, int); + createtime = va_arg(ap, unsigned long); + maxmsglen = va_arg(ap, int); + maxoccupancy = va_arg(ap, int); + createperms = va_arg(ap, int); + unknown = va_arg(ap, int); + name = va_arg(ap, char *); + ck = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: received room create reply for %s/0x%04x\n", fqcn, exchange); + } + break; + default: + va_end(ap); + dvprintf("faimtest: chatnav info: unknown type (%04x)\n", type); + } + return 1; +} - switch(type) - { - case 0x0002: - { - int maxrooms; - struct aim_chat_exchangeinfo *exchanges; - int exchangecount,i = 0; - - maxrooms = va_arg(ap, u_char); - exchangecount = va_arg(ap, int); - exchanges = va_arg(ap, struct aim_chat_exchangeinfo *); - va_end(ap); - - printf("faimtest: chat info: Chat Rights:\n"); - printf("faimtest: chat info: \tMax Concurrent Rooms: %d\n", maxrooms); - - printf("faimtest: chat info: \tExchange List: (%d total)\n", exchangecount); - while (i < exchangecount) - { - printf("faimtest: chat info: \t\t%x: %s (%s/%s)\n", - exchanges[i].number, - exchanges[i].name, - exchanges[i].charset1, - exchanges[i].lang1); - i++; - } - +int faimtest_parse_connerr(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + unsigned short code; + char *msg = NULL; + + va_start(ap, command); + code = va_arg(ap, int); + msg = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: connerr: Code 0x%04x: %s\n", code, msg); + aim_conn_kill(sess, &command->conn); /* this will break the main loop */ + + return 1; +} + +int faimtest_debugconn_connect(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + dprintf("faimtest: connecting to an aimdebugd!\n"); + + /* convert the authorizer connection to a BOS connection */ + command->conn->type = AIM_CONN_TYPE_BOS; + + aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_MSG, AIM_CB_MSG_INCOMING, faimtest_parse_incoming_im, 0); + + /* tell the aimddebugd we're ready */ + aim_debugconn_sendconnect(sess, command->conn); + + /* go right into main loop (don't open a BOS connection, etc) */ + return 1; +} + +/* + * Received in response to an IM sent with the AIM_IMFLAGS_ACK option. + */ +int faimtest_parse_msgack(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + unsigned short type; + char *sn = NULL; + + va_start(ap, command); + type = va_arg(ap, int); + sn = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: msgack: 0x%04x / %s\n", type, sn); + + return 1; +} + +int faimtest_getfile_filereq(struct aim_session_t *ses, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *oftconn; + struct aim_fileheader_t *fh; + char *cookie; + + va_start(ap, command); + oftconn = va_arg(ap, struct aim_conn_t *); + fh = va_arg(ap, struct aim_fileheader_t *); + cookie = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: request for file %s.\n", fh->name); + + return 1; +} + + +int faimtest_getfile_filesend(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *oftconn; + struct aim_fileheader_t *fh; + char *path, *cookie; + int pos, bufpos = 0, bufsize = 2048, i; + char *buf; + + FILE *file; + + va_start(ap, command); + oftconn = va_arg(ap, struct aim_conn_t *); + fh = va_arg(ap, struct aim_fileheader_t *); + cookie = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: sending file %s(%ld).\n", fh->name, fh->size); + + if(!(buf = malloc(2048))) + return -1; + + if( (path = (char *)calloc(1, strlen(listingpath) +strlen(fh->name)+2)) == NULL) { + dperror("calloc"); + dprintf("faimtest: error in calloc of path\n"); + return 0; /* XXX: no idea what winaim expects here =) */ + } + + snprintf(path, strlen(listingpath)+strlen(fh->name)+2, "%s/%s", listingpath, fh->name); + + + if( (file = fopen(path, "r")) == NULL) { + dvprintf("faimtest: getfile_send fopen failed for %s. damn.\n", path); + return 0; + } + + /* + * This is a mess. Remember that faimtest is demonstration code + * only and for the sake of the gods, don't use this code in any + * of your clients. --mid + */ + for(pos = 0; pos < fh->size; pos++) { + bufpos = pos % bufsize; + + if(bufpos == 0 && pos > 0) { /* filled our buffer. spit it across the wire */ + if ( (i = send(oftconn->fd, buf, bufsize, 0)) != bufsize ) { + dperror("faim: getfile_send: write1"); + dprintf("faim: getfile_send: whoopsy, didn't write it all...\n"); + free(buf); + return -1; + } + } + if( (buf[bufpos] = fgetc(file)) == EOF) { + if(pos != fh->size) { + dvprintf("faim: getfile_send: hrm... apparent early EOF at pos 0x%x of 0x%lx\n", pos, fh->size); + free(buf); + return -1; + } + } + dvprintf("%c(0x%02x) ", buf[pos], buf[pos]); + } + + if( (i = send(oftconn->fd, buf, bufpos+1, 0)) != (bufpos+1)) { + dperror("faim: getfile_send: write2"); + dprintf("faim: getfile_send cleanup: whoopsy, didn't write it all...\n"); + free(buf); + return -1; + } + + free(buf); + free(fh); + return 1; +} + +int faimtest_getfile_complete(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + struct aim_fileheader_t *fh; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + fh = va_arg(ap, struct aim_fileheader_t *); + va_end(ap); + + dvprintf("faimtest: completed file transfer for %s.\n", fh->name); + + aim_conn_close(conn); + aim_conn_kill(sess, &conn); + return 1; +} + +int faimtest_getfile_disconnect(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + char *sn; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + sn = va_arg(ap, char *); + va_end(ap); + + aim_conn_kill(sess, &conn); + + dvprintf("faimtest: getfile: disconnected from %s\n", sn); + return 1; +} +int faimtest_getfile_initiate(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn, *listenerconn; + struct aim_filetransfer_priv *priv; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + listenerconn = va_arg(ap, struct aim_conn_t *); + va_end(ap); + + aim_conn_close(listenerconn); + aim_conn_kill(sess, &listenerconn); + + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILEREQ, faimtest_getfile_filereq, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEFILESEND, faimtest_getfile_filesend, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILECOMPLETE, faimtest_getfile_complete, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILEDISCONNECT, faimtest_getfile_disconnect, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTING, faimtest_getfile_listing, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILELISTINGREQ, faimtest_getfile_listingreq, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILERECEIVE, faimtest_getfile_receive, 0); + aim_conn_addhandler(sess, conn, AIM_CB_FAM_OFT, AIM_CB_OFT_GETFILESTATE4, faimtest_getfile_state4, 0); + + priv = (struct aim_filetransfer_priv *)conn->priv; + + dvprintf("faimtest: getfile: %s (%s) connected to us on %d\n", priv->sn, priv->ip, conn->fd); + return 1; +} + +int faimtest_getfile_listing(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + char *listing; + struct aim_filetransfer_priv *ft; + char *filename, *nameend, *sizec; + int filesize, namelen; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + ft = va_arg(ap, struct aim_filetransfer_priv *); + listing = va_arg(ap, char *); + va_end(ap); + + dvprintf("listing on %d==================\n%s\n===========\n", conn->fd, listing); + + nameend = strstr(listing+0x1a, "\r"); + + namelen = nameend - (listing + 0x1a); + + filename = malloc(namelen + 1); + strncpy(filename, listing+0x1a, namelen); + filename[namelen] = 0x00; + + sizec = malloc(8+1); + memcpy(sizec, listing + 0x11, 8); + sizec[8] = 0x00; + + filesize = strtol(sizec, (char **)NULL, 10); + + dvprintf("faimtest: requesting %d %s(%d long)\n", namelen, filename, filesize); + + aim_oft_getfile_request(sess, conn, filename, filesize); + + free(filename); + free(sizec); + + return 0; +} + +int faimtest_getfile_listingreq(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *oftconn; + struct aim_fileheader_t *fh; + int pos, bufpos = 0, bufsize = 2048, i; + char *buf; + + va_start(ap, command); + oftconn = va_arg(ap, struct aim_conn_t *); + fh = va_arg(ap, struct aim_fileheader_t *); + va_end(ap); + + dvprintf("faimtest: sending listing of size %ld\n", fh->size); + + if(!(buf = malloc(2048))) + return -1; + + for(pos = 0; pos < fh->size; pos++) { + bufpos = pos % bufsize; + + if(bufpos == 0 && pos > 0) { /* filled our buffer. spit it across the wire */ + if ( (i = send(oftconn->fd, buf, bufsize, 0)) != bufsize ) { + dperror("faim: getfile_send: write1"); + dprintf("faim: getfile_send: whoopsy, didn't write it all...\n"); + free(buf); + return -1; } - break; - default: - va_end(ap); - printf("faimtest: chatnav info: unknown type (%04x)\n", type); } + if( (buf[bufpos] = fgetc(listingfile)) == EOF) { + if(pos != fh->size) { + dvprintf("faim: getfile_send: hrm... apparent early EOF at pos 0x%x of 0x%lx\n", pos, fh->size); + free(buf); + return -1; + } + } + } + + if( (i = send(oftconn->fd, buf, bufpos+1, 0)) != (bufpos+1)) { + dperror("faim: getfile_send: write2"); + dprintf("faim: getfile_send cleanup: whoopsy, didn't write it all...\n"); + free(buf); + return -1; + } + + dprintf("faimtest: sent listing\n"); + free(buf); + return 0; +} + +int faimtest_getfile_receive(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + struct aim_filetransfer_priv *ft; + unsigned char data; + int pos; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + ft = va_arg(ap, struct aim_filetransfer_priv *); + va_end(ap); + + dvprintf("faimtest: receiving %ld bytes of file data for %s:\n\t", ft->fh.size, ft->fh.name); + + for(pos = 0; pos < ft->fh.size; pos++) { + read(conn->fd, &data, 1); + printf("%c(%02x) ", data, data); + } + + printf("\n"); + + aim_oft_getfile_end(sess, conn); + + return 0; +} + +int faimtest_getfile_state4(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + struct aim_conn_t *conn; + + va_start(ap, command); + conn = va_arg(ap, struct aim_conn_t *); + va_end(ap); + + aim_conn_close(conn); + aim_conn_kill(sess, &conn); + return 0; +} + + +int faimtest_parse_ratechange(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + static char *codes[5] = {"invalid", + "change", + "warning", + "limit", + "limit cleared"}; + va_list ap; + int code; + unsigned long rateclass, windowsize, clear, alert, limit, disconnect; + unsigned long currentavg, maxavg; + + va_start(ap, command); + + /* See code explanations below */ + code = va_arg(ap, int); + + /* + * See comments above aim_parse_ratechange_middle() in aim_rxhandlers.c. + */ + rateclass = va_arg(ap, unsigned long); + + /* + * Not sure what this is exactly. I think its the temporal + * relation factor (ie, how to make the rest of the numbers + * make sense in the real world). + */ + windowsize = va_arg(ap, unsigned long); + + /* Explained below */ + clear = va_arg(ap, unsigned long); + alert = va_arg(ap, unsigned long); + limit = va_arg(ap, unsigned long); + disconnect = va_arg(ap, unsigned long); + currentavg = va_arg(ap, unsigned long); + maxavg = va_arg(ap, unsigned long); + + va_end(ap); + + + dvprintf("faimtest: rate %s (rate class 0x%04lx): curavg = %ld, maxavg = %ld, alert at %ld, clear warning at %ld, limit at %ld, disconnect at %ld (window size = %ld)\n", + (code < 5)?codes[code]:"invalid", + rateclass, + currentavg, maxavg, + alert, clear, + limit, disconnect, + windowsize); + + if (code == AIM_RATE_CODE_CHANGE) { + /* + * Not real sure when these get sent. + */ + if (currentavg >= clear) + aim_conn_setlatency(command->conn, 0); + + } else if (code == AIM_RATE_CODE_WARNING) { + /* + * We start getting WARNINGs the first time we go below the 'alert' + * limit (currentavg < alert) and they stop when either we pause + * long enough for currentavg to go above 'clear', or until we + * flood it bad enough to go below 'limit' (and start getting + * LIMITs instead) or even further and go below 'disconnect' and + * get disconnected completely (and won't be able to login right + * away either). + */ + aim_conn_setlatency(command->conn, windowsize/4); /* XXX this is bogus! */ + + } else if (code == AIM_RATE_CODE_LIMIT) { + /* + * When we hit LIMIT, messages will start getting dropped. + */ + aim_conn_setlatency(command->conn, windowsize/2); /* XXX this is bogus! */ + + } else if (code == AIM_RATE_CODE_CLEARLIMIT) { + /* + * The limit is cleared when curavg goes above 'clear'. + */ + aim_conn_setlatency(command->conn, 0); + } + + return 1; +} + +int faimtest_parse_evilnotify(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + int newevil; + struct aim_userinfo_s *userinfo; + + va_start(ap, command); + newevil = va_arg(ap, int); + userinfo = va_arg(ap, struct aim_userinfo_s *); + va_end(ap); + + /* + * Evil Notifications that are lacking userinfo->sn are anon-warns + * if they are an evil increases, but are not warnings at all if its + * a decrease (its the natural backoff happening). + * + * newevil is passed as an int representing the new evil value times + * ten. + */ + dvprintf("faimtest: evil level change: new value = %2.1f%% (caused by %s)\n", ((float)newevil)/10, (userinfo && strlen(userinfo->sn))?userinfo->sn:"anonymous"); + + return 1; +} + +int faimtest_parse_searchreply(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + char *address, *SNs; + int i, num; + + va_start(ap, command); + address = va_arg(ap, char *); + num = va_arg(ap, int); + SNs = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: E-Mail Search Results for %s: ", address); + + for(i = 0; i < num; i++) + dvinlineprintf("%s, ", &SNs[i*(MAXSNLEN+1)]); + dinlineprintf("\n"); + + return 1; +} + +int faimtest_parse_searcherror(struct aim_session_t *sess, struct command_rx_struct *command, ...) +{ + va_list ap; + char *address; + + va_start(ap, command); + address = va_arg(ap, char *); + va_end(ap); + + dvprintf("faimtest: E-Mail Search Results for %s: No Results or Invalid Email\n", address); + return 1; }