utils/faimtest/faimtest.c

   1 /*
   2  *  -----------------------------------------------------------
   3  *  ProtoFAIM: v1.xx.xxplxx
   4  *  -----------------------------------------------------------
   5  *
   6  *  This is ProtoFAIM v1.xx.xxplxx!!! Its nearly completely
   7  *  different than that ugly thing called v0.  This app is
   8  *  compatible with the latest version of the libfaim library.
   9  *  Work is continuing.
  10  *
  11  *  ProtoFAIM should only be used for two things...
  12  *   1) Testing the libfaim backend.
  13  *   2) For reference on the libfaim API when developing clients.
  14  *
  15  *  Its very ugly.  Probably always will be.  Nothing is more
  16  *  ugly than the backend itself, however.
  17  *
  18  *  -----------------------------------------------------------
  19  *
  20  *  I'm releasing this code and all it's associated linkage
  21  *  under the GNU General Public License.  For more information,
  22  *  please refer to http://www.fsf.org.  For any questions,
  23  *  please contact me at the address below.
  24  *
  25  *  Most everything:
  26  *  (c) 1998 Adam Fritzler, PST, afritz@iname.com
  27  *
  28  *  The password algorithms
  29  *  (c) 1998 Brock Wilcox, awwaiid@iname.com
  30  *
  31  *  THERE IS NO CODE FROM AOL'S AIM IN THIS CODE, NOR
  32  *  WAS THERE ANY DISASSEMBLAGE TO DEFINE PROTOCOL.  All
  33  *  information was gained through painstakingly comparing
  34  *  TCP dumps while the AIM Java client was running.  Nothing
  35  *  more than that, except for a lot of experimenting.
  36  *
  37  *  -----------------------------------------------------------
  38  *
  39  */
  40
  41 /*
  42   Current status:
  43
  44
  45  */
  46
  47 #include <faim/aim.h>
  48
  49 int faimtest_parse_oncoming(struct aim_session_t *, struct command_rx_struct *, ...);
  50 int faimtest_parse_offgoing(struct aim_session_t *, struct command_rx_struct *, ...);
  51 int faimtest_parse_login_phase3d_f(struct aim_session_t *, struct command_rx_struct *, ...);
  52 int faimtest_parse_authresp(struct aim_session_t *, struct command_rx_struct *, ...);
  53 int faimtest_parse_incoming_im(struct aim_session_t *, struct command_rx_struct *command, ...);
  54 int faimtest_parse_userinfo(struct aim_session_t *, struct command_rx_struct *command, ...);
  55 int faimtest_handleredirect(struct aim_session_t *, struct command_rx_struct *command, ...);
  56 int faimtest_authsvrready(struct aim_session_t *, struct command_rx_struct *command, ...);
  57 int faimtest_pwdchngdone(struct aim_session_t *, struct command_rx_struct *command, ...);
  58 int faimtest_serverready(struct aim_session_t *, struct command_rx_struct *command, ...);
  59 int faimtest_parse_misses(struct aim_session_t *, struct command_rx_struct *command, ...);
  60 int faimtest_parse_motd(struct aim_session_t *, struct command_rx_struct *command, ...);
  61 int faimtest_parse_login(struct aim_session_t *, struct command_rx_struct *command, ...);
  62 int faimtest_chatnav_info(struct aim_session_t *, struct command_rx_struct *command, ...);
  63 int faimtest_chat_incomingmsg(struct aim_session_t *sess, struct command_rx_struct *command, ...);
  64 int faimtest_chat_infoupdate(struct aim_session_t *sess, struct command_rx_struct *command, ...);
  65 int faimtest_chat_leave(struct aim_session_t *sess, struct command_rx_struct *command, ...);
  66 int faimtest_chat_join(struct aim_session_t *sess, struct command_rx_struct *command, ...);
  67
  68 static char *screenname,*password,*server=NULL;
  69
  70 int main(void)
  71 {
  72   struct aim_session_t aimsess;
  73   struct aim_conn_t *authconn = NULL, *waitingconn = NULL;
  74   int keepgoing = 1, stayconnected = 1;
  75   struct client_info_s info = {"FAIMtest (Hi guys!)", 3, 5, 1670, "us", "en"};
  76   int selstat = 0;
  77
  78   aim_session_init(&aimsess);
  79
  80   if ( !(screenname = getenv("SCREENNAME")) ||
  81        !(password = getenv("PASSWORD")))
  82     {
  83       printf("Must specify SCREENAME and PASSWORD in environment.\n");
  84       return -1;
  85     }
  86
  87   server = getenv("AUTHSERVER");
  88
  89   /*
  90    * (I used a goto-based loop here because n wanted quick proof
  91    *  that reconnecting without restarting was actually possible...)
  92    */
  93  enter:
  94   authconn = aim_newconn(&aimsess, AIM_CONN_TYPE_AUTH, server?server:FAIM_LOGIN_SERVER);
  95
  96   if (authconn == NULL)
  97     {
  98       fprintf(stderr, "faimtest: internal connection error while in aim_login.  bailing out.\n");
  99       return -1;
 100     }
 101   else if (authconn->fd == -1)
 102     {
 103       if (authconn->status & AIM_CONN_STATUS_RESOLVERR)
 104         fprintf(stderr, "faimtest: could not resolve authorizer name\n");
 105       else if (authconn->status & AIM_CONN_STATUS_CONNERR)
 106         fprintf(stderr, "faimtest: could not connect to authorizer\n");
 107       return -1;
 108     }
 109   else
 110     {
 111 #ifdef SNACLOGIN
 112       /* new login code -- not default -- pending new password encryption algo */
 113       aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0007, faimtest_parse_login, 0);
 114       aim_conn_addhandler(&aimsess, authconn, 0x0017, 0x0003, faimtest_parse_authresp, 0);
 115
 116       aim_sendconnack(&aimsess, authconn);
 117       aim_request_login(&aimsess, authconn, FAIMTEST_SCREENNAME);
 118 #else
 119       aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_AUTHSUCCESS, faimtest_parse_authresp, 0);
 120       aim_conn_addhandler(&aimsess, authconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SERVERREADY, faimtest_authsvrready, 0);
 121       aim_send_login(&aimsess, authconn, screenname, password, &info);
 122
 123 #endif
 124     }
 125
 126   while (keepgoing) {
 127     waitingconn = aim_select(&aimsess, NULL, &selstat);
 128
 129     switch(selstat) {
 130     case -1: /* error */
 131       keepgoing = 0;
 132       break;
 133
 134     case 0: /* no events pending */
 135       break;
 136
 137     case 1: /* outgoing data pending */
 138       aim_tx_flushqueue(&aimsess);
 139       break;
 140
 141     case 2: /* incoming data pending */
 142       if (aim_get_command(&aimsess, waitingconn) < 0) {
 143           printf("\afaimtest: connection error!\n");
 144       } else
 145         aim_rxdispatch(&aimsess);
 146       break;
 147
 148     default:
 149       break; /* invalid */
 150     }
 151   }
 152
 153   /* Close up */
 154   printf("AIM just decided we didn't need to be here anymore, closing up...\n");
 155
 156   /* close up all connections, dead or no */
 157   aim_logoff(&aimsess);
 158
 159   if (stayconnected) {
 160       printf("\nTrying to reconnect in 2 seconds...\n");
 161       sleep(2);
 162       goto enter;
 163     }
 164
 165   /* Get out */
 166   exit(0);
 167 }
 168
 169 int faimtest_serverready(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 170 {
 171   switch (command->conn->type)
 172     {
 173     case AIM_CONN_TYPE_BOS:
 174
 175       aim_bos_reqrate(sess, command->conn); /* request rate info */
 176       aim_bos_ackrateresp(sess, command->conn);  /* ack rate info response -- can we say timing? */
 177       aim_bos_setprivacyflags(sess, command->conn, 0x00000003);
 178
 179 #if 0
 180       aim_bos_reqpersonalinfo(sess, command->conn);
 181 #endif
 182
 183       /* Request advertisement service -- see comment in handleredirect */
 184       aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_ADS);
 185       aim_setversions(sess, command->conn);
 186
 187 #if 0
 188       aim_bos_reqrights(sess, command->conn);
 189       aim_bos_reqbuddyrights(sess, command->conn);
 190       aim_bos_reqlocaterights(sess, command->conn);
 191       aim_bos_reqicbmparaminfo(sess, command->conn);
 192 #endif
 193
 194       /* set group permissions */
 195       aim_bos_setgroupperm(sess, command->conn, 0x1f);
 196       fprintf(stderr, "faimtest: done with BOS ServerReady\n");
 197       break;
 198
 199     case AIM_CONN_TYPE_CHATNAV:
 200       fprintf(stderr, "faimtest: chatnav: got server ready\n");
 201       aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CTN, AIM_CB_CTN_INFO, faimtest_chatnav_info, 0);
 202       aim_bos_reqrate(sess, command->conn);
 203       aim_bos_ackrateresp(sess, command->conn);
 204       aim_chatnav_clientready(sess, command->conn);
 205       aim_chatnav_reqrights(sess, command->conn);
 206
 207       break;
 208     case AIM_CONN_TYPE_CHAT:
 209       aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERJOIN, faimtest_chat_join, 0);
 210       aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERLEAVE, faimtest_chat_leave, 0);
 211       aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_ROOMINFOUPDATE, faimtest_chat_infoupdate, 0);
 212       aim_conn_addhandler(sess, command->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_INCOMINGMSG, faimtest_chat_incomingmsg, 0);
 213       aim_bos_reqrate(sess, command->conn);
 214       aim_bos_ackrateresp(sess, command->conn);
 215       aim_chat_clientready(sess, command->conn);
 216       break;
 217     default:
 218       fprintf(stderr, "faimtest: unknown connection type on Server Ready\n");
 219     }
 220   return 1;
 221 }
 222
 223 /*
 224   handleredirect()...
 225
 226   This, of course, handles Service Redirects from OSCAR.
 227
 228   Should get passed in the following:
 229      struct command_rx_struct *command
 230        the raw command data
 231      int serviceid
 232        the destination service ID
 233      char *serverip
 234        the IP address of the service's server
 235      char *cookie
 236        the raw auth cookie
 237  */
 238 int faimtest_handleredirect(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 239 {
 240   va_list ap;
 241   int serviceid;
 242   char *ip;
 243   char *cookie;
 244
 245   /* this is the new buddy list */
 246   char buddies[] = "Buddy1&Buddy2&ThisHereIsAName2&";
 247   /* this is the new profile */
 248   char profile[] = "Hello";
 249
 250   va_start(ap, command);
 251   serviceid = va_arg(ap, int);
 252   ip = va_arg(ap, char *);
 253   cookie = va_arg(ap, char *);
 254
 255   switch(serviceid)
 256     {
 257     case 0x0005: /* Advertisements */
 258       /*
 259        * The craziest explanation yet as to why we finish logging in when
 260        * we get the advertisements redirect, of which we don't use anyway....
 261        *                    IT WAS EASY!
 262        */
 263
 264       /* send the buddy list and profile (required, even if empty) */
 265       aim_bos_setbuddylist(sess, command->conn, buddies);
 266       aim_bos_setprofile(sess, command->conn, profile, NULL, AIM_CAPS_CHAT);
 267
 268       /* send final login command (required) */
 269       aim_bos_clientready(sess, command->conn); /* tell BOS we're ready to go live */
 270
 271       /* you should now be ready to go */
 272       printf("\nYou are now officially online.\n");
 273
 274       break;
 275     case 0x0007: /* Authorizer */
 276       {
 277         struct aim_conn_t *tstconn;
 278         /* Open a connection to the Auth */
 279         tstconn = aim_newconn(sess, AIM_CONN_TYPE_AUTH, ip);
 280         if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR) )
 281           fprintf(stderr, "faimtest: unable to reconnect with authorizer\n");
 282         else
 283           /* Send the cookie to the Auth */
 284           aim_auth_sendcookie(sess, tstconn, cookie);
 285
 286       }
 287       break;
 288     case 0x000d: /* ChatNav */
 289       {
 290         struct aim_conn_t *tstconn = NULL;
 291         tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHATNAV, ip);
 292         if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR))
 293           {
 294             fprintf(stderr, "faimtest: unable to connect to chatnav server\n");
 295             return 1;
 296           }
 297 #if 0
 298         aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_CTN, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0);
 299         aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_GEN, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0);
 300 #endif
 301         aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0);
 302         aim_auth_sendcookie(sess, tstconn, cookie);
 303         fprintf(stderr, "\achatnav: connected\n");
 304       }
 305       break;
 306     case 0x000e: /* Chat */
 307       {
 308         char *roomname = NULL;
 309         struct aim_conn_t *tstconn = NULL;
 310
 311         roomname = va_arg(ap, char *);
 312
 313         tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHAT, ip);
 314         if ( (tstconn==NULL) || (tstconn->status >= AIM_CONN_STATUS_RESOLVERR))
 315           {
 316             fprintf(stderr, "faimtest: unable to connect to chat server\n");
 317             return 1;
 318           }
 319         printf("faimtest: chat: connected\n");
 320
 321         /*
 322          * We must do this to attach the stored name to the connection!
 323          */
 324         aim_chat_attachname(tstconn, roomname);
 325
 326         aim_conn_addhandler(sess, tstconn, 0x0001, 0x0003, faimtest_serverready, 0);
 327         aim_auth_sendcookie(sess, tstconn, cookie);
 328       }
 329       break;
 330     default:
 331       printf("uh oh... got redirect for unknown service 0x%04x!!\n", serviceid);
 332       /* dunno */
 333     }
 334
 335   va_end(ap);
 336
 337   return 1;
 338 }
 339
 340 int faimtest_parse_authresp(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 341 {
 342   struct aim_conn_t *bosconn = NULL;
 343
 344
 345   printf("Screen name: %s\n", sess->logininfo.screen_name);
 346
 347   /*
 348    * Check for error.
 349    */
 350   if (sess->logininfo.errorcode)
 351     {
 352       printf("Login Error Code 0x%04x\n", sess->logininfo.errorcode);
 353       printf("Error URL: %s\n", sess->logininfo.errorurl);
 354       aim_conn_close(command->conn);
 355       exit(0); /* XXX: should return in order to let the above things get free()'d. */
 356     }
 357
 358   printf("Reg status: %2d\n", sess->logininfo.regstatus);
 359   printf("Email: %s\n", sess->logininfo.email);
 360   printf("BOS IP: %s\n", sess->logininfo.BOSIP);
 361
 362   printf("Closing auth connection...\n");
 363   aim_conn_close(command->conn);
 364   bosconn = aim_newconn(sess, AIM_CONN_TYPE_BOS, sess->logininfo.BOSIP);
 365   if (bosconn == NULL)
 366     {
 367       fprintf(stderr, "faimtest: could not connect to BOS: internal error\n");
 368     }
 369   else if (bosconn->status != 0)
 370     {
 371       fprintf(stderr, "faimtest: could not connect to BOS\n");
 372     }
 373   else
 374     {
 375       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ACK, AIM_CB_ACK_ACK, NULL, 0);
 376       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SERVERREADY, faimtest_serverready, 0);
 377       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATEINFO, NULL, 0);
 378       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_REDIRECT, faimtest_handleredirect, 0);
 379       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_STS, AIM_CB_STS_SETREPORTINTERVAL, NULL, 0);
 380       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_ONCOMING, faimtest_parse_oncoming, 0);
 381       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_OFFGOING, faimtest_parse_offgoing, 0);
 382       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_INCOMING, faimtest_parse_incoming_im, 0);
 383       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_ERROR, faimtest_parse_misses, 0);
 384       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_MISSEDCALL, faimtest_parse_misses, 0);
 385       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATECHANGE, faimtest_parse_misses, 0);
 386       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_ERROR, faimtest_parse_misses, 0);
 387       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_USERINFO, faimtest_parse_userinfo, 0);
 388
 389       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_CTN, AIM_CB_CTN_DEFAULT, aim_parse_unknown, 0);
 390       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_DEFAULT, aim_parse_unknown, 0);
 391       aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_MOTD, faimtest_parse_motd, 0);
 392       aim_auth_sendcookie(sess, bosconn, sess->logininfo.cookie);
 393     }
 394   return 1;
 395 }
 396
 397 int faimtest_parse_userinfo(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 398 {
 399   struct aim_userinfo_s *userinfo;
 400   char *prof_encoding = NULL;
 401   char *prof = NULL;
 402
 403   va_list ap;
 404   va_start(ap, command);
 405   userinfo = va_arg(ap, struct aim_userinfo_s *);
 406   prof_encoding = va_arg(ap, char *);
 407   prof = va_arg(ap, char *);
 408   va_end(ap);
 409
 410   printf("faimtest: userinfo: sn: %s\n", userinfo->sn);
 411   printf("faimtest: userinfo: warnlevel: 0x%04x\n", userinfo->warnlevel);
 412   printf("faimtest: userinfo: class: 0x%04x = ", userinfo->class);
 413
 414   /*
 415    *  00000000  (binary)
 416    *         1  Trial
 417    *        2   Unknown
 418    *       3    AOL
 419    *      4     Unknown
 420    *     5      Free
 421    *
 422    * ORed together.
 423    *
 424    */
 425
 426   if (userinfo->class & 0x0001)
 427     printf("TRIAL ");
 428   if (userinfo->class & 0x0002)
 429     printf("UNKNOWN_BIT2 ");
 430   if (userinfo->class & 0x0004)
 431     printf("AOL ");
 432   if (userinfo->class & 0x0008)
 433     printf("UNKNOWN_BIT4 ");
 434   if (userinfo->class & 0x0010)
 435     printf("FREE ");
 436   printf("\n");
 437
 438   printf("faimtest: userinfo: membersince: %lu\n", userinfo->membersince);
 439   printf("faimtest: userinfo: onlinesince: %lu\n", userinfo->onlinesince);
 440   printf("faimtest: userinfo: idletime: 0x%04x\n", userinfo->idletime);
 441
 442   printf("faimtest: userinfo: profile_encoding: %s\n", prof_encoding ? prof_encoding : "[none]");
 443   printf("faimtest: userinfo: prof: %s\n", prof ? prof : "[none]");
 444
 445   return 1;
 446 }
 447
 448 /*
 449  * The user-level Incoming ICBM callback.
 450  *
 451  * Arguments:
 452  *  struct command_rx_struct *  command     if you feel like doing it yourself
 453  *  char *                      srcsn       the source name
 454  *  char *                      msg         message
 455  *  int                         warnlevel   warning/evil level
 456  *  int                         class       user class
 457  *  ulong                       membersince time_t of date of signup
 458  *  ulong                       onsince     time_t of date of singon
 459  *  int                         idletime    min (sec?) idle
 460  *  u_int                       icbmflags   sets AIM_IMFLAGS_{AWAY,ACK}
 461  *
 462  */
 463 int faimtest_parse_incoming_im(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 464 {
 465   int channel;
 466   va_list ap;
 467
 468   va_start(ap, command);
 469   channel = va_arg(ap, int);
 470
 471   /*
 472    * Channel 1: Standard Message
 473    */
 474   if (channel == 1)
 475     {
 476       struct aim_userinfo_s *userinfo;
 477       char *msg = NULL;
 478       u_int icbmflags = 0;
 479       char *tmpstr = NULL;
 480       u_short flag1, flag2;
 481
 482       userinfo = va_arg(ap, struct aim_userinfo_s *);
 483       msg = va_arg(ap, char *);
 484       icbmflags = va_arg(ap, u_int);
 485       flag1 = va_arg(ap, u_short);
 486       flag2 = va_arg(ap, u_short);
 487       va_end(ap);
 488
 489       printf("faimtest: icbm: sn = \"%s\"\n", userinfo->sn);
 490       printf("faimtest: icbm: warnlevel = 0x%04x\n", userinfo->warnlevel);
 491       printf("faimtest: icbm: class = 0x%04x ", userinfo->class);
 492       if (userinfo->class & 0x0010)
 493         printf("(FREE) ");
 494       if (userinfo->class & 0x0001)
 495         printf("(TRIAL) ");
 496       if (userinfo->class & 0x0004)
 497         printf("(AOL) ");
 498       printf("\n");
 499       printf("faimtest: icbm: membersince = %lu\n", userinfo->membersince);
 500       printf("faimtest: icbm: onlinesince = %lu\n", userinfo->onlinesince);
 501       printf("faimtest: icbm: idletime = 0x%04x\n", userinfo->idletime);
 502
 503       printf("faimtest: icbm: icbmflags = ");
 504       if (icbmflags & AIM_IMFLAGS_AWAY)
 505         printf("away ");
 506       if (icbmflags & AIM_IMFLAGS_ACK)
 507         printf("ackrequest ");
 508       printf("\n");
 509
 510       printf("faimtest: icbm: encoding flags = {%04x, %04x}\n", flag1, flag2);
 511
 512       printf("faimtest: icbm: message: %s\n", msg);
 513
 514       if (msg)
 515         {
 516           tmpstr = index(msg, '>');
 517           if (tmpstr != NULL)
 518             tmpstr+=1;
 519           else
 520             tmpstr = msg;
 521
 522           if ( (strlen(tmpstr) >= 10) &&
 523                (!strncmp(tmpstr, "disconnect", 10)) )
 524             {
 525               aim_send_im(sess, command->conn, "midendian", 0, "ta ta...");
 526               aim_logoff(sess);
 527             }
 528           else if (strstr(tmpstr, "goodday"))
 529             {
 530               printf("faimtest: icbm: sending response\n");
 531               aim_send_im(sess, command->conn, userinfo->sn, 0, "Good day to you too.");
 532             }
 533           else if (!strncmp(tmpstr, "open chatnav", 12))
 534             {
 535               aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_CHATNAV);
 536               //aim_chat_join(sess, command->conn, "thishereisaname2_chat85");
 537             }
 538           else if (!strncmp(tmpstr, "create", 6))
 539             {
 540               aim_chatnav_createroom(sess, aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV), "WorldDomination", 0x0004);
 541             }
 542           else if (!strncmp(tmpstr, "close chatnav", 13))
 543             aim_conn_close(aim_getconn_type(sess, AIM_CONN_TYPE_CHATNAV));
 544           else if (!strncmp(tmpstr, "join", 4))
 545             {
 546               aim_chat_join(sess, command->conn, 0x0004, "worlddomination");
 547             }
 548           else if (!strncmp(tmpstr, "leave", 5))
 549             aim_chat_leaveroom(sess, "worlddomination");
 550           else
 551             {
 552 #if 0
 553               printf("faimtest: icbm:  starting chat...\n");
 554               aim_bos_reqservice(sess, command->conn, AIM_CONN_TYPE_CHATNAV);
 555 #else
 556               aim_bos_setidle(sess, command->conn, 0x0ffffffe);
 557 #endif
 558             }
 559
 560         }
 561     }
 562   /*
 563    * Channel 2: Rendevous Request
 564    */
 565   else if (channel == 2)
 566     {
 567       struct aim_userinfo_s *userinfo;
 568       int rendtype = 0;
 569
 570       rendtype = va_arg(ap, int);
 571       if (rendtype == 0)
 572         {
 573           char *msg,*encoding,*lang;
 574           struct aim_chat_roominfo *roominfo;
 575
 576           userinfo = va_arg(ap, struct aim_userinfo_s *);
 577           roominfo = va_arg(ap, struct aim_chat_roominfo *);
 578           msg = va_arg(ap, char *);
 579           encoding = va_arg(ap, char *);
 580           lang = va_arg(ap, char *);
 581           va_end(ap);
 582
 583           printf("faimtest: chat invitation: source sn = %s\n", userinfo->sn);
 584           printf("faimtest: chat invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel);
 585           printf("faimtest: chat invitation: \tclass = 0x%04x ", userinfo->class);
 586           if (userinfo->class & 0x0010)
 587             printf("(FREE) ");
 588           if (userinfo->class & 0x0001)
 589             printf("(TRIAL) ");
 590           if (userinfo->class & 0x0004)
 591             printf("(AOL) ");
 592           printf("\n");
 593           /* we dont get membersince on chat invites! */
 594           printf("faimtest: chat invitation: \tonlinesince = %lu\n", userinfo->onlinesince);
 595           printf("faimtest: chat invitation: \tidletime = 0x%04x\n", userinfo->idletime);
 596
 597           printf("faimtest: chat invitation: message = %s\n", msg);
 598           printf("faimtest: chat invitation: room name = %s\n", roominfo->name);
 599           printf("faimtest: chat invitation: encoding = %s\n", encoding);
 600           printf("faimtest: chat invitation: language = %s\n", lang);
 601           printf("faimtest: chat invitation: exchange = 0x%04x\n", roominfo->exchange);
 602           printf("faimtest: chat invitation: instance = 0x%04x\n", roominfo->instance);
 603           printf("faimtest: chat invitiation: autojoining %s...\n", roominfo->name);
 604           /*
 605            * Automatically join room...
 606            */
 607           aim_chat_join(sess, command->conn, 0x0004, roominfo->name);
 608         }
 609       else if (rendtype == 1)
 610         {
 611           userinfo = va_arg(ap, struct aim_userinfo_s *);
 612           va_end(ap);
 613
 614           printf("faimtest: voice invitation: source sn = %s\n", userinfo->sn);
 615           printf("faimtest: voice invitation: \twarnlevel = 0x%04x\n", userinfo->warnlevel);
 616           printf("faimtest: voice invitation: \tclass = 0x%04x ", userinfo->class);
 617           if (userinfo->class & 0x0010)
 618             printf("(FREE) ");
 619           if (userinfo->class & 0x0001)
 620             printf("(TRIAL) ");
 621           if (userinfo->class & 0x0004)
 622             printf("(AOL) ");
 623           printf("\n");
 624           /* we dont get membersince on chat invites! */
 625           printf("faimtest: voice invitation: \tonlinesince = %lu\n", userinfo->onlinesince);
 626           printf("faimtest: voice invitation: \tidletime = 0x%04x\n", userinfo->idletime);
 627
 628         }
 629       else
 630         printf("faimtest: icbm: unknown rendtype (%d)\n", rendtype);
 631     }
 632   else
 633     printf("faimtest does not support channels > 2 (chan = %02x)\n", channel);
 634   printf("faimtest: icbm: done with ICBM handling\n");
 635
 636   return 1;
 637 }
 638
 639 int faimtest_authsvrready(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 640 {
 641   printf("faimtest_authsvrready: called (contype: %d)\n", command->conn->type);
 642   sleep(10);
 643   /* should just be able to tell it we're ready too... */
 644   aim_auth_clientready(sess, command->conn);
 645
 646 #if 0
 647   /*
 648    * This is where you'd really begin changing your password.
 649    *   However, this callback may get called for reasons other
 650    *   than you wanting to change your password.  You should
 651    *   probably check that before actually doing it.
 652    */
 653   aim_auth_changepasswd(sess, command->conn, "PWD1", "PWD2");
 654 #endif
 655
 656   return 1;
 657 }
 658
 659 int faimtest_pwdchngdone(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 660 {
 661   printf("PASSWORD CHANGE SUCCESSFUL!!!\n");
 662   return 1;
 663 }
 664
 665 int faimtest_parse_oncoming(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 666 {
 667   struct aim_userinfo_s *userinfo;
 668
 669   va_list ap;
 670   va_start(ap, command);
 671   userinfo = va_arg(ap, struct aim_userinfo_s *);
 672   va_end(ap);
 673
 674   printf("\n%s is now online (class: %04x = %s%s%s%s%s%s%s%s)\n", userinfo->sn, userinfo->class,
 675          (userinfo->class&AIM_CLASS_TRIAL)?" TRIAL":"",
 676          (userinfo->class&AIM_CLASS_UNKNOWN2)?" UNKNOWN2":"",
 677          (userinfo->class&AIM_CLASS_AOL)?" AOL":"",
 678          (userinfo->class&AIM_CLASS_UNKNOWN4)?" UNKNOWN4":"",
 679          (userinfo->class&AIM_CLASS_FREE)?" FREE":"",
 680          (userinfo->class&AIM_CLASS_AWAY)?" AWAY":"",
 681          (userinfo->class&AIM_CLASS_UNKNOWN40)?" UNKNOWN40":"",
 682          (userinfo->class&AIM_CLASS_UNKNOWN80)?" UNKNOWN80":"");
 683
 684   return 1;
 685 }
 686
 687 int faimtest_parse_offgoing(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 688 {
 689   char *sn;
 690   va_list ap;
 691
 692   va_start(ap, command);
 693   sn = va_arg(ap, char *);
 694   va_end(ap);
 695
 696   printf("\n%s has left\n", sn);
 697
 698   return 1;
 699 }
 700
 701 int faimtest_parse_motd(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 702 {
 703   char *msg;
 704   u_short id;
 705   va_list ap;
 706
 707   va_start(ap, command);
 708   id = va_arg(ap, u_short);
 709   msg = va_arg(ap, char *);
 710   va_end(ap);
 711
 712   printf("faimtest: motd: %s\n", msg);
 713
 714   return 1;
 715 }
 716
 717 /*
 718  * Handles callbacks for: AIM_CB_RATECHANGE, AIM_CB_USERERROR,
 719  *   AIM_CB_MISSED_IM, and AIM_CB_MISSED_CALL.
 720  */
 721 int faimtest_parse_misses(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 722 {
 723   u_short family;
 724   u_short subtype;
 725
 726   family = aimutil_get16(command->data+0);
 727   subtype= aimutil_get16(command->data+2);
 728
 729   switch (family)
 730     {
 731     case 0x0001:
 732       if (subtype == 0x000a) /* or AIM_CB_RATECHANGE */
 733         printf("\n****STOP SENDING/RECIEVING MESSAGES SO FAST!****\n\n");
 734       break;
 735     case 0x0002:
 736       if (subtype == 0x0001) /* or AIM_CB_USERERROR */
 737         {
 738           u_long snacid = 0x00000000;
 739
 740           snacid = aimutil_get32(&command->data[6]);
 741
 742           printf("Received unknown error in SNAC family 0x0002 (snacid = %08lx)\n", snacid);
 743         }
 744       break;
 745     case 0x0004:
 746       if (subtype == 0x0001) /* or AIM_CB_MISSED_IM */
 747         printf("\n***LAST IM DIDN\'T MAKE IT BECAUSE THE BUDDY IS NOT ONLINE***\n\n");
 748       else if (subtype == 0x000a) /* or AIM_CB_MISSED_CALL */
 749         printf("You missed some messages from %s because they were sent too fast\n", &(command->data[13]));
 750       break;
 751     }
 752
 753   return 0;
 754 }
 755
 756 #ifdef SNACLOGIN
 757 int faimtest_parse_login(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 758 {
 759   struct client_info_s info = {"FAIMtest (Hi guys!)", 3, 5, 1670, "us", "en"};
 760   u_char authcookie[11];
 761   int i;
 762
 763   for (i = 0; i < (int)command->data[11]; i++)
 764     authcookie[i] = command->data[12+i];
 765   authcookie[i] = '\0';
 766
 767   printf("faimtest: logincookie: %s\n", authcookie);
 768
 769   aim_send_login(sess, command->conn, FAIMTEST_SCREENNAME, FAIMTEST_PASSWORD, &info);
 770
 771   return 1;
 772 }
 773 #endif
 774
 775 int faimtest_chat_join(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 776 {
 777   va_list ap;
 778   struct aim_userinfo_s *userinfo;
 779   int count = 0, i = 0;
 780
 781   va_start(ap, command);
 782   count = va_arg(ap, int);
 783   userinfo = va_arg(ap, struct aim_userinfo_s *);
 784   va_end(ap);
 785
 786   printf("faimtest: chat: %s:  New occupants have joined:\n", (char *)command->conn->priv);
 787   while (i < count)
 788     printf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn);
 789
 790   return 1;
 791 }
 792
 793 int faimtest_chat_leave(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 794 {
 795   va_list ap;
 796   struct aim_userinfo_s *userinfo;
 797   int count = 0, i = 0;
 798
 799   va_start(ap, command);
 800   count = va_arg(ap, int);
 801   userinfo = va_arg(ap, struct aim_userinfo_s *);
 802   va_end(ap);
 803
 804   printf("faimtest: chat: %s:  Some occupants have left:\n", (char *)command->conn->priv);
 805   while (i < count)
 806     printf("faimtest: chat: %s: \t%s\n", (char *)command->conn->priv, userinfo[i++].sn);
 807
 808   return 1;
 809 }
 810
 811 int faimtest_chat_infoupdate(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 812 {
 813   va_list ap;
 814   struct aim_userinfo_s *userinfo;
 815   struct aim_chat_roominfo *roominfo;
 816   char *roomname;
 817   int usercount,i;
 818   char *roomdesc;
 819
 820   va_start(ap, command);
 821   roominfo = va_arg(ap, struct aim_chat_roominfo *);
 822   roomname = va_arg(ap, char *);
 823   usercount= va_arg(ap, int);
 824   userinfo = va_arg(ap, struct aim_userinfo_s *);
 825   roomdesc = va_arg(ap, char *);
 826   va_end(ap);
 827
 828   printf("faimtest: chat: %s:  info update:\n", (char *)command->conn->priv);
 829   printf("faimtest: chat: %s:  \tRoominfo: {%04x, %s, %04x}\n",
 830          (char *)command->conn->priv,
 831          roominfo->exchange,
 832          roominfo->name,
 833          roominfo->instance);
 834   printf("faimtest: chat: %s:  \tRoomname: %s\n", (char *)command->conn->priv, roomname);
 835   printf("faimtest: chat: %s:  \tRoomdesc: %s\n", (char *)command->conn->priv, roomdesc);
 836   printf("faimtest: chat: %s:  \tOccupants: (%d)\n", (char *)command->conn->priv, usercount);
 837
 838   i = 0;
 839   while (i < usercount)
 840     printf("faimtest: chat: %s:  \t\t%s\n", (char *)command->conn->priv, userinfo[i++].sn);
 841
 842   return 1;
 843 }
 844
 845 int faimtest_chat_incomingmsg(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 846 {
 847   va_list ap;
 848   struct aim_userinfo_s *userinfo;
 849   char *msg;
 850   char tmpbuf[1152];
 851
 852   va_start(ap, command);
 853   userinfo = va_arg(ap, struct aim_userinfo_s *);
 854   msg = va_arg(ap, char *);
 855   va_end(ap);
 856
 857   printf("faimtest: chat: %s: incoming msg from %s: %s\n", (char *)command->conn->priv, userinfo->sn, msg);
 858
 859   /*
 860    * Do an echo for testing purposes.  But not for ourselves ("oops!")
 861    */
 862   if (strcmp(userinfo->sn, sess->logininfo.screen_name) != 0)
 863     {
 864       sprintf(tmpbuf, "(%s said \"%s\")", userinfo->sn, msg);
 865       aim_chat_send_im(sess, command->conn, tmpbuf);
 866     }
 867
 868   return 1;
 869 }
 870
 871 int faimtest_chatnav_info(struct aim_session_t *sess, struct command_rx_struct *command, ...)
 872 {
 873   u_short type;
 874   va_list ap;
 875
 876   ap = va_start(ap, command);
 877   type = va_arg(ap, u_short);
 878
 879   switch(type)
 880     {
 881     case 0x0002:
 882       {
 883         int maxrooms;
 884         struct aim_chat_exchangeinfo *exchanges;
 885         int exchangecount,i = 0;
 886
 887         maxrooms = va_arg(ap, u_char);
 888         exchangecount = va_arg(ap, int);
 889         exchanges = va_arg(ap, struct aim_chat_exchangeinfo *);
 890         va_end(ap);
 891
 892         printf("faimtest: chat info: Chat Rights:\n");
 893         printf("faimtest: chat info: \tMax Concurrent Rooms: %d\n", maxrooms);
 894
 895         printf("faimtest: chat info: \tExchange List: (%d total)\n", exchangecount);
 896         while (i < exchangecount)
 897           {
 898             printf("faimtest: chat info: \t\t%x: %s (%s/%s)\n",
 899                    exchanges[i].number,
 900                    exchanges[i].name,
 901                    exchanges[i].charset1,
 902                    exchanges[i].lang1);
 903             i++;
 904           }
 905
 906       }
 907       break;
 908     default:
 909       va_end(ap);
 910       printf("faimtest: chatnav info: unknown type (%04x)\n", type);
 911     }
 912   return 1;
 913 }