开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > ICQ/即时通讯 > 查看源码
ui.c
资源名称：micq.tgz　[点击查看]
上传用户：ai20ln
上传日期：2007-01-05
资源大小：79k
文件大小：31k
源码类别：

ICQ/即时通讯

开发平台：

Unix_Linux

ui.c：源码内容
  1. /*********************************************
  2. **********************************************
  3. This file has the "ui" functions that read input
  4. and send messages etc.
  6. This software is provided AS IS to be used in
  7. whatever way you see fit and is placed in the
  8. public domain.
  10. Author : Matthew Smith April 23, 1998
  11. Contributors : Nicolas Sahlqvist April 27, 1998
  12.                Michael Ivey May 4, 1998
  13.                Ulf Hedlund -- Windows Support
  14.                Michael Holzt May 5, 1998
  15. Changes :
  16. 22-6-98 Added the save and alter command and the
  17.         new implementation of auto
  18. **********************************************
  19. **********************************************/
  20. #define color_cmd "color"
  21. #define sound_cmd "sound"
  23. #include "micq.h"
  24. #include "datatype.h"
  25. #include <stdio.h>
  26. #include <stdlib.h>
  27. #ifdef _WIN32
  28.   #include <winsock2.h>
  29. #else
  30.   #include <unistd.h>
  31.   #include <netinet/in.h>
  32.   #include <sys/types.h>
  33.   #include <sys/stat.h>
  34.   #include <sys/time.h>
  35.   #include <sys/socket.h>
  36.   #include <arpa/inet.h>
  37.   #include <netdb.h>
  38. #endif
  39. #include <fcntl.h>
  40. #include <time.h>
  41. #include <stdarg.h>
  42. #include <string.h>
  43. #include <ctype.h>
  44. #include <assert.h>
  45. #include "ui.h"
  47. USER_INFO_STRUCT user;
  49. #ifdef UNIX
  50. char *strdup( const char * );
  51. int strcasecmp( const char *, const char * );
  52. #endif
  54. BOOL Do_Multiline( SOK_T sok, char *buf )
  55. {
  56.    static int offset=0;
  57.    static char msg[1024];
  58.    
  59.    msg[ offset ] = 0;
  60.    if ( strcmp( buf, END_MSG_STR ) == 0 )
  61.    {
  62.       icq_sendmsg( sok, multi_uin, msg, NORM_MESS );
  63.       M_print( "Message sent to " );
  64.       Print_UIN_Name( multi_uin );
  65.       M_print( "n");
  66.       last_uin = multi_uin;
  67.       offset = 0;
  68.       return FALSE;
  69.    }
  70.    else if ( strcmp( buf, CANCEL_MSG_STR ) == 0 )
  71.    {
  72.       M_print( "Message canceled!n" );
  73.       last_uin = multi_uin;
  74.       offset = 0;
  75.       return FALSE;
  76.    }
  77.    else
  78.    {
  79.       if ( offset + strlen( buf ) < 450 )
  80.       {
  81.          strcat( msg, buf );
  82.          strcat( msg, "rn" );
  83.          offset += strlen( buf ) + 2;
  84.          return TRUE;
  85.       }
  86.       else
  87.       {
  88.          M_print( "Message sent before last line buffer is fulln" );
  89.          M_print( "Message sent to " );
  90.          Print_UIN_Name( multi_uin );
  91.          M_print( "n");
  92.          icq_sendmsg( sok, multi_uin, msg, NORM_MESS );
  93.          last_uin = multi_uin;
  94.          offset = 0;
  95.          return FALSE;
  96.       }
  97.    }
  98. }
  100. void Info_Update( SOK_T sok, char *buf )
  101. {
  102.    
  103.    switch ( status ) {
  104.    case NEW_NICK:
  105.       user.nick = strdup( (char *) buf );
  106.     M_print ( "Enter Your New First Name : ");
  107.     fflush(stdout);
  108.       status++;
  109.       break;
  110.    case NEW_FIRST:
  111.       user.first = strdup( (char *) buf );
  112.     M_print ( "Enter Your New Last Name : ");
  113.     fflush(stdout);
  114.       status++;
  115.       break;
  116.    case NEW_LAST:
  117.       user.last = strdup( (char *) buf );
  118.     M_print ( "Enter Your New Email Address : ");
  119.     fflush(stdout);
  120.       status++;
  121.       break;
  122.    case NEW_EMAIL:
  123.       user.email = strdup( (char *) buf );
  124.     M_print ( "Do you want to require Mirabilis users to request your authorization? : ");
  125.     fflush(stdout);
  126.       status++;
  127.       break;
  128.    case NEW_AUTH:
  129.       if ( ! strcasecmp( buf, NO_STR ) )
  130.       {
  131.          user.auth = FALSE;
  132.          Update_User_Info( sok, &user );
  133. /*         free( user.nick );
  134.          free( user.last );
  135.          free( user.first );
  136.          free( user.email ); */
  137.          status = 0;
  138.       }
  139.       else if ( ! strcasecmp( buf, YES_STR ) )
  140.       {
  141.          user.auth = TRUE;
  142.          Update_User_Info( sok, &user );
  143.          free( user.nick );
  144.          free( user.last );
  145.          free( user.first );
  146.          free( user.email );
  147.          status = 0;
  148.       }
  149.       else
  150.       {
  151.          M_print( "Please enter %s or %s.n", YES_STR, NO_STR );
  152.        M_print( "Do you want to require Mirabilis users to request your authorization? : ");
  153.        fflush(stdout);
  154.       }
  155.       break;
  156.    }
  157. }
  159. BOOL Do_Multiline_All( SOK_T sok, char *buf )
  160. {
  161.    static int offset=0;
  162.    static char msg[1024];
  163.    int i;
  164.    
  165.    msg[ offset ] = 0;
  166.    if ( strcmp( buf, END_MSG_STR ) == 0 )
  167.    {
  168.       for ( i=0; i < Num_Contacts; i++ )
  169.          icq_sendmsg( sok, Contacts[i].uin, msg, MRNORM_MESS );
  170.       M_print( "Message sent!n" );
  171.       offset = 0;
  172.       return FALSE;
  173.    }
  174.    else if ( strcmp( buf, CANCEL_MSG_STR ) == 0 )
  175.    {
  176.       M_print( "Message canceled!n" );
  177.       offset = 0;
  178.       return FALSE;
  179.    }
  180.    else
  181.    {
  182.       if ( offset + strlen( buf ) < 450 )
  183.       {
  184.          strcat( msg, buf );
  185.          strcat( msg, "rn" );
  186.          offset += strlen( buf ) + 2;
  187.          return TRUE;
  188.       }
  189.       else
  190.       {
  191.          M_print( "Message sent before last line buffer is fulln" );
  192.          for ( i=0; i < Num_Contacts; i++ )
  193.             icq_sendmsg( sok, Contacts[i].uin, msg, MRNORM_MESS );
  194.          offset = 0;
  195.          return FALSE;
  196.       }
  197.    }
  198. }
  200. /******************************************************
  201. Read a line of input and processes it.
  202. *******************************************************/
  203. void Get_Input( SOK_T sok )
  204. {
  205.    char buf[1024]; /* This is hopefully enough */
  206.    char *cmd;
  207.    char *arg1;
  208.    char *arg2;
  209.    int i;
  210.    
  211.    memset( buf, 0, 1024 );
  212.    M_fdnreadln( STDIN, buf, 1024 ); /* assumes we're line buffered input */
  213.    buf[1023]=0; /* be safe */
  214.    if ( status == 1 )
  215.    {
  216.       if ( ! Do_Multiline( sok, buf ) )
  217.       {
  218.          status = 2;
  219.       } else {
  220.    M_print ( "msg> ");
  221.    fflush(stdout);
  222.     }
  223.    }
  224.    else if ( status == 3 )
  225.    {
  226.       if ( ! Do_Multiline_All( sok, buf ) ) {
  227.          status = 2;
  228.       } else {
  229.        M_print ( "msg all> ");
  230.        fflush(stdout);
  231.     }
  232.    }
  233.    else if ( ( status >= NEW_NICK) && ( status <= NEW_AUTH) )
  234.    {  Info_Update( sok, buf ); }
  235.    else
  236.    {
  237.       if ( buf[0] != 0 )
  238.       {
  239.         if ( '!' == buf[0] )
  240.         {
  241.    system( &buf[1] );
  242.            Prompt();
  243.            return;
  244.         }
  245.          cmd = strtok( buf, " nt" );
  246.         if ( NULL == cmd )
  247.         {
  248.            Prompt();
  249.            return;
  250.         }
  251.          /* goto's removed and code fixed by Paul Laufer. Enjoy! */
  252.          if ( ( strcasecmp( cmd , "quit" ) == 0 ) ||
  253.               ( strcasecmp( cmd , "/quit" ) == 0 ) )
  254.             {  Quit = TRUE; }
  255.          else if ( strcasecmp( cmd, quit_cmd ) == 0 )
  256.             {  Quit = TRUE; }
  257.          else if ( strcasecmp( cmd, sound_cmd ) == 0 )
  258.          {
  259.             if ( SOUND_ON == Sound )
  260.             {
  261.                Sound = SOUND_OFF;
  262.                M_print( "Sound" SERVCOL " OFF" NOCOL ".n" );
  263.             }
  264.             else if ( SOUND_OFF == Sound )
  265.             {
  266.                Sound = SOUND_ON;
  267.                M_print( "Sound" SERVCOL  " ON" NOCOL ".n" );
  268.             }
  269.          }
  270.          else if ( strcasecmp( cmd, change_cmd ) == 0 )
  271.             {  Change_Function( sok ); }
  272.          else if ( strcasecmp( cmd, "rand" ) == 0 )
  273.             {  Random_Function( sok ); }
  274.          else if ( strcasecmp( cmd, "set" ) == 0 )
  275.             {  Random_Set_Function( sok ); }
  276.             else if ( ! strcasecmp( cmd, color_cmd ) )
  277.             { 
  278.                Color = !Color;
  279.                if ( Color )
  280.                {
  281.                   M_print( "Color is " MESSCOL "on" NOCOL ".n" );
  282.                }
  283.                else
  284.                {
  285.                   M_print( "Color is " MESSCOL "off" NOCOL ".n" );
  286.                }
  287.             }
  288.       else if ( ! strcasecmp( cmd, online_cmd ) ) /* online command */
  289.           {   CHANGE_STATUS( STATUS_ONLINE ); }
  290.       else if ( ! strcasecmp( cmd, away_cmd ) ) /* away command */
  291.          {   CHANGE_STATUS( STATUS_AWAY ); }
  292.       else if ( ! strcasecmp( cmd, na_cmd ) ) /* Not Available command */
  293.           {   CHANGE_STATUS( STATUS_NA ); }
  294.       else if ( ! strcasecmp( cmd, occ_cmd ) ) /* Occupied command */
  295.          {   CHANGE_STATUS( STATUS_OCCUPIED ); }
  296.       else if ( ! strcasecmp( cmd, dnd_cmd ) ) /* Do not Disturb  command */
  297.           {   CHANGE_STATUS( STATUS_DND ); }
  298.       else if ( ! strcasecmp( cmd, ffc_cmd ) ) /* Free For Chat command */
  299.           {   CHANGE_STATUS( STATUS_FREE_CHAT ); }
  300.       else if ( ! strcasecmp( cmd, inv_cmd ) ) /* Invisible command */
  301.           {   CHANGE_STATUS( STATUS_INVISIBLE ); }
  302.       else if ( ! strcasecmp( cmd, search_cmd ) )
  303.        {
  304.              arg1 = strtok( NULL, "n" );
  305.              if ( arg1 == NULL )
  306.              {
  307.                M_print("Must enter email address.n");
  308.              }
  309.              else
  310.              {
  311.               start_search( sok, arg1, "", "", "" );
  312.              }
  313.       }
  314.          else if ( ! strcasecmp( cmd, status_cmd ) ) 
  315.          {  Show_Status(); }
  316.          else if ( ! strcasecmp( cmd, list_cmd ) ) 
  317.          {  Show_Quick_Status(); }
  318.          else if ( ! strcasecmp( cmd, msga_cmd ) )
  319.          {
  320.             status = 3;
  321.             M_print( "msg all> " );
  322.             fflush(stdout);
  323.          }
  324.          else if ( ! strcasecmp( cmd, reply_cmd ) ) /* reply command */
  325.          {
  326.             Reply_Function( sok );
  327.          }
  328.          else if ( ! strcasecmp( cmd, "reg" ) )
  329.          {
  330.             arg1 = strtok( NULL, "" );
  331.             if ( arg1 != NULL )
  332.             {  reg_new_user( sok, arg1 ); }
  333.          }
  334.          else if ( ! strcasecmp( cmd, again_cmd ) ) /* again command */
  335.          {  Again_Function( sok ); }
  336.          else if ( ! strcasecmp( cmd, "clear"))
  337.        { clrscr(); }
  338.          else if ( ! strcasecmp( cmd, info_cmd ) )
  339.          {  Info_Function( sok ); }
  340.          else if ( ! strcasecmp( cmd, "ver" ) )
  341.          { M_print( "Micq Version : " MESSCOL MICQ_VERSION NOCOL " Compiled on "__TIME__ " "  __DATE__"n" ); }
  342.          else if ( ! strcasecmp( cmd, add_cmd ) )
  343.          {
  344.             arg1 = strtok( NULL, " t" );
  345.             if ( arg1 != NULL )
  346.             {
  347.                uin = atoi( arg1 );
  348.                arg1 = strtok( NULL, "" );
  349.                if ( arg1 != NULL )
  350.                {
  351.                   Add_User( sok, uin, arg1 );
  352.                   M_print( "%s added.n", arg1 );
  353.                }
  354.             }
  355.             else
  356.             {
  357.                M_print( SERVCOL "Must specify a nick name" NOCOL "n" );
  358.             }
  359.          }
  360.          else if ( strcasecmp( cmd, "verbose" ) == 0 )
  361.          { Verbose_Function(); }
  362.          else if ( strcasecmp( cmd, "rinfo" ) == 0 )
  363.          {
  364.             Print_UIN_Name( last_recv_uin );
  365.             M_print( "'s IP address is " );
  366.             Print_IP( last_recv_uin );
  367.             M_print( "tThe port is %dn",(WORD) Get_Port( last_recv_uin ) );
  368.             M_print( "n" );
  369.             send_info_req( sok, last_recv_uin );
  370.             send_ext_info_req( sok, last_recv_uin );
  371.          }
  372.          else if ( ( strcasecmp( cmd, "/help" ) == 0 ) ||/* Help command */
  373.                    ( strcasecmp( cmd, "help" ) == 0 ) )
  374.          {  Help_Function(); }
  375.          else if ( strcasecmp( cmd, auth_cmd ) == 0 )
  376.          {
  377.              arg1 = strtok( NULL, "" );
  378.              if ( arg1 == NULL )
  379.              {
  380.                 M_print( "Need uin to send ton" );
  381.              }
  382.              else
  383.              {
  384.               uin = nick2uin( arg1 );
  385.               if ( -1 == uin )
  386.               {
  387.                  M_print( "%s not recognized as a nick namen", arg1 );
  388.               }
  389.               else icq_sendauthmsg( sok, uin );
  390.              }         
  391.          }
  392.          else if ( strcasecmp( cmd, message_cmd ) == 0 ) /* "/msg" */
  393.          {
  394.             Message_Function( sok );
  395.          }
  396.       else if ( strcasecmp( cmd, url_cmd ) == 0 ) /* "/msg" */
  397.       {
  398.       arg1 = strtok( NULL, " " );
  399.       if ( arg1 == NULL )
  400.       {
  401.       M_print( "Need uin to send ton" );
  402.       }
  403.       else
  404.       {
  405.       uin = nick2uin( arg1 );
  406.       if ( uin == -1 )
  407.       {
  408.       M_print( "%s not recognized as a nick namen", arg1 );
  409.       }
  410.       else
  411.       {
  412.       arg1 = strtok( NULL, " " );
  413.       last_uin = uin;
  414.       if ( arg1 != NULL )
  415.       {
  416.       arg2 = strtok(NULL, "");
  417. /*       sM_print(arg1, "%s%c%s", arg1, 'xFE', arg2);*/
  418.       icq_sendurl( sok, uin, arg1, arg2 );
  419.       M_print( "URL sent to ");
  420.       Print_UIN_Name( last_uin );
  421.       M_print( "!n");
  422.       } else {
  423.       M_print("Need URL please.n");
  424.       } 
  425.       }
  426.       }
  427.       }
  428.          else if ( ! strcasecmp( cmd, alter_cmd ) ) /* alter command */
  429.          {  Alter_Function(); }
  430.          else if ( ! strcasecmp( cmd, save_cmd ) ) /* save command */
  431.          {
  432.             i=Save_RC();
  433.             if (i==-1)
  434.                M_print("Sorry saving your personal reply messages went wrong!n");
  435.             else
  436.                M_print("Your personal settings have been saved!n");
  437.          }
  438.          else if ( ! strcasecmp( cmd, "update" ) )
  439.          {
  440.             status = NEW_NICK;
  441.             M_print( "Enter Your New Nickname : " );
  442.             fflush(stdout);
  443.          }
  444.          else if ( strcasecmp( cmd, auto_cmd ) == 0 )
  445.          {  Auto_Function( sok ); }
  446.          else 
  447.          {  M_print( "Unknown command %s, type /help for help.n", cmd ); }
  448.       }
  449.    }
  450.    multi_uin = last_uin;
  451.    if ( ( status == 0 ) || ( status == 2) )
  452.    {
  453.       if ( ! Quit )
  454.          Prompt();
  455.    }
  456. }
  458. /**************************************************************
  459. most detailed contact list display
  460. ***************************************************************/
  461. static void Show_Status( void )
  462. {
  463.    int i;
  465.    M_print( W_SEPERATOR );
  466.    M_print( "Your status is " );
  467.    Print_Status( Current_Status );
  468.    M_print( "n" );
  469.    /*  First loop sorts thru all offline users */
  470.    M_print( W_SEPERATOR );
  471.    M_print( "Users offline: n" );
  472.    for ( i=0; i< Num_Contacts; i++ )
  473.    {
  474.       if ( ( S_DWORD )Contacts[ i ].uin > 0 )
  475.       {
  476.          if ( FALSE == Contacts[ i ].invis_list )
  477.  {
  478.             if ( Contacts[ i ].status == STATUS_OFFLINE )
  479.             {
  480.                if ( Contacts[i].vis_list ) {
  481.            M_print( "%s*%s", SERVCOL, NOCOL );
  482.                } else {
  483.            M_print( " " );
  484.                }
  485.                M_print( "%8ld=", Contacts[ i ].uin );
  486.                M_print( CONTACTCOL "%-20st%s(", Contacts[ i ].nick, MESSCOL );
  487.                Print_Status( Contacts[ i ].status );
  488.                M_print( ")%s", NOCOL );
  489.                if ( -1L != Contacts[ i ].last_time )
  490.                {
  491.            if ( Contacts[ i ].status  == STATUS_OFFLINE )
  492.                      M_print( " Last online at %s", ctime( (time_t *) &Contacts[ i ].last_time ) );
  493.            else
  494.                      M_print( " Online since %s", ctime( (time_t *) &Contacts[ i ].last_time )  );
  495.                }
  496.                else
  497.                {
  498.            M_print( " Last on-line unknown.n" );
  499.            /* if time is unknow they can't be logged on cause we */
  500.            /* set the time at login */
  501.                }
  502.             }
  503.  }
  504.       }
  505.    }
  506.    /* The second loop displays all the online users */
  507.    M_print( W_SEPERATOR );
  508.    M_print( "Users online: n" );
  509.    for ( i=0; i< Num_Contacts; i++ )
  510.    {
  511.       if ( ( S_DWORD )Contacts[ i ].uin > 0 )
  512.       {
  513.          if ( FALSE == Contacts[ i ].invis_list )
  514.  {
  515.             if ( Contacts[ i ].status != STATUS_OFFLINE )
  516.             {
  517.                if ( Contacts[i].vis_list ) {
  518.            M_print( "%s*%s", SERVCOL, NOCOL );
  519.                } else {
  520.            M_print( " " );
  521.                }
  522.                M_print( "%8ld=", Contacts[ i ].uin );
  523.                M_print( CONTACTCOL "%-20st%s(", Contacts[ i ].nick, MESSCOL );
  524.                Print_Status( Contacts[ i ].status );
  525.                M_print( ")%s", NOCOL );
  526.                if ( -1L != Contacts[ i ].last_time )
  527.                {
  528.            if ( Contacts[ i ].status  == STATUS_OFFLINE )
  529.                      M_print( " Last online at %s", ctime( (time_t *) &Contacts[ i ].last_time ) );
  530.            else
  531.                      M_print( " Online since %s", ctime( (time_t *) &Contacts[ i ].last_time )  );
  532.                }
  533.                else
  534.                {
  535.            M_print( " Last on-line unknown.n" );
  536.            /* if time is unknow they can't be logged on cause we */
  537.            /* set the time at login */
  538.                }
  539.             }
  540.  }
  541.       }
  542.    }
  543.    M_print( W_SEPERATOR );
  544. }
  546. /***************************************************************
  547. nice clean "w" display
  548. ****************************************************************/
  549. void Show_Quick_Status( void )
  550. {
  551.    int i;
  552.    
  553.    M_print( "nn" W_SEPERATOR );
  554.    M_print( "%lu: ", UIN );
  555.    M_print( "Your status is " );
  556.    Print_Status( Current_Status );
  557.    M_print( "n" );
  558.    /*  First loop sorts thru all offline users */
  559.    /*  This comes first so that if there are many contacts */
  560.    /*  The online ones will be less likely to scroll off the screen */
  561.    M_print( W_SEPERATOR );
  562.    M_print( "Users offline: n" );
  563.    for ( i=0; i< Num_Contacts; i++ )
  564.    {
  565.       if ( ( S_DWORD )Contacts[ i ].uin > 0 )
  566.       {
  567.          if ( FALSE == Contacts[ i ].invis_list )
  568.  {
  569.             if ( Contacts[ i ].status == STATUS_OFFLINE )
  570.             {
  571.                if ( Contacts[i].vis_list ) {
  572.            M_print( "%s*%s", SERVCOL, NOCOL );
  573.                } else {
  574.            M_print( " " );
  575.                }
  576.                M_print( CONTACTCOL "%-20st" MESSCOL "(" , Contacts[ i ].nick );
  577.                Print_Status( Contacts[ i ].status );
  578.                M_print( ")" NOCOL "n" );
  579.             }
  580.  }
  581.       }
  582.    }
  583.    /* The second loop displays all the online users */
  584.    M_print( W_SEPERATOR );
  585.    M_print( "Users online: n" );
  586.    for ( i=0; i< Num_Contacts; i++ )
  587.    {
  588.       if ( ( S_DWORD )Contacts[ i ].uin > 0 )
  589.       {
  590.          if ( FALSE == Contacts[ i ].invis_list )
  591.  {
  592.             if ( Contacts[ i ].status != STATUS_OFFLINE )
  593.             {
  594.                if ( Contacts[i].vis_list ) {
  595.            M_print( "%s*%s", SERVCOL, NOCOL );
  596.                } else {
  597.            M_print( " " );
  598.                }
  599.                M_print( CONTACTCOL "%-20st" MESSCOL "(", Contacts[ i ].nick );
  600.                Print_Status( Contacts[ i ].status );
  601.                M_print( ")" NOCOL "n" );
  602.             }
  603.  }
  604.       }
  605.    }
  606.    M_print( W_SEPERATOR );
  607. }
  609. /***************************************************
  610. Do not call unless you've already made a call to strtok()
  611. ****************************************************/
  612. static void Change_Function( SOK_T sok )
  613. {
  614.    char *arg1;
  615.    arg1 = strtok( NULL, " nr" );
  616.    if ( arg1 == NULL )
  617.    {
  618.       M_print(  CLIENTCOL "Status modes: n" );
  619.       M_print( "Status online         %dn", STATUS_ONLINE );
  620.       M_print( "Status Away           %dn", STATUS_AWAY );
  621.       M_print( "Status Do not Disturb %dn", STATUS_DND );
  622.       M_print( "Status Not Available  %dn", STATUS_NA );
  623.       M_print( "Status Free for Chat  %dn", STATUS_FREE_CHAT );
  624.       M_print( "Status Occupied       %dn", STATUS_OCCUPIED );
  625.       M_print( "Status Invisible      %dn", STATUS_INVISIBLE );
  626.       M_print( NOCOL "n" );
  627.    }
  628.    else
  629.    {
  630.       icq_change_status( sok, atoi( arg1 ) );
  631.       Print_Status( Current_Status );
  632.       M_print( "n" );
  633.    }
  634. }
  636. /***************************************************
  637. Do not call unless you've already made a call to strtok()
  638. ****************************************************/
  639. static void Random_Function( SOK_T sok )
  640. {
  641.    char *arg1;
  642.    arg1 = strtok( NULL, " nr" );
  643.    if ( arg1 == NULL )
  644.    {
  645.       M_print(  CLIENTCOL "Groups: n" );
  646.       M_print( "General                    1n" );
  647.       M_print( "Romance                    2n" );
  648.       M_print( "Games                      3n" );
  649.       M_print( "Students                   4n" );
  650.       M_print( "20 something               6n" );
  651.       M_print( "30 something               7n" );
  652.       M_print( "40 something               8n" );
  653.       M_print( "50+                        9n" );
  654.       M_print( "Man chat requesting women 10n" );
  655.       M_print( "Woman chat requesting men 11n" );
  656.       M_print( "Micq                      49 (might not work but try it)n" );
  657.       M_print( NOCOL "n" );
  658.    }
  659.    else
  660.    {
  661.       icq_rand_user_req( sok, atoi( arg1 ) );
  662.       M_print( "n" );
  663.    }
  664. }
  666. /***************************************************
  667. Do not call unless you've already made a call to strtok()
  668. ****************************************************/
  669. static void Random_Set_Function( SOK_T sok )
  670. {
  671.    char *arg1;
  672.    arg1 = strtok( NULL, " nr" );
  673.    if ( arg1 == NULL )
  674.    {
  675.       M_print(  CLIENTCOL "Groups: n" );
  676.       M_print( "None                      -1n" );
  677.       M_print( "General                    1n" );
  678.       M_print( "Romance                    2n" );
  679.       M_print( "Games                      3n" );
  680.       M_print( "Students                   4n" );
  681.       M_print( "20 something               6n" );
  682.       M_print( "30 something               7n" );
  683.       M_print( "40 something               8n" );
  684.       M_print( "50+                        9n" );
  685.       M_print( "Man chat requesting women 10n" );
  686.       M_print( "Woman chat requesting men 11n" );
  687.       M_print( "Micq                      49 (might not work but try it)n" );
  688.       M_print( NOCOL "n" );
  689.    }
  690.    else
  691.    {
  692.       icq_rand_set( sok, atoi( arg1 ) );
  693.       M_print( "n" );
  694.    }
  695. }
  697. /*****************************************************************
  698. Displays help information.
  699. ******************************************************************/
  700. static void Help_Function( void )
  701. {
  702.     M_print( MESSCOL "reg password" NOCOL "ttCreates a new UIN with the specified password.n");
  703.     M_print( MESSCOL "verbose #" NOCOL "tSet the verbosity level ( default = 0 ).n");
  704.     M_print( MESSCOL "%s" NOCOL "ttMark as Online.n",online_cmd);
  705.     M_print( MESSCOL "%s" NOCOL "ttMark as Away.n",away_cmd);
  706.             M_print( MESSCOL "%s" NOCOL "ttMark as Not Available.n",na_cmd);
  707.             M_print( MESSCOL "%s" NOCOL "ttMark as Occupied.n",occ_cmd);
  708.             M_print( MESSCOL "%s" NOCOL "ttMark as Do not Disturb.n",dnd_cmd);
  709.             M_print( MESSCOL "%s" NOCOL "ttMark as Free for Chat.n",ffc_cmd);
  710.             M_print( MESSCOL "%s" NOCOL "ttMark as Invisible.n",inv_cmd);
  711.             M_print( MESSCOL "clear" NOCOL "ttClears the screen.n" );
  712.             M_print( MESSCOL "%s" NOCOL"ttDisplays your autoreply statusn",auto_cmd );
  713.             M_print( MESSCOL "%s [on|off]" NOCOL "tToggles sending messages when your status is DND, NA, etc.n",auto_cmd );
  714.             M_print( MESSCOL "%s status message" NOCOL "tSets the message to send as an auto reply for the statusn",auto_cmd );
  715.             M_print( MESSCOL "%s old command new command" NOCOL "tThis command allows you to alter your command set on the fly.n",alter_cmd);
  716.             M_print( MESSCOL "%s" NOCOL "ttDisplays the current status of everyone on your contact listn",list_cmd);
  717.             M_print( MESSCOL "%s [#]" NOCOL "tChanges your status to the status number.nttWithout a number it lists the available modes.n",change_cmd);
  718.             M_print( MESSCOL "%s uin" NOCOL "t Displays general info on uinn", info_cmd );
  719.             M_print( MESSCOL "%s email@host" NOCOL "tSearches for a ICQ user with the specified email address.n", search_cmd );
  720.     M_print( MESSCOL "rand [#]" NOCOL "tFinds a random user in the specified group or lists the groups.n" );
  721.     M_print( MESSCOL "set [#]" NOCOL "tSets your random user group.n" );
  722.     M_print( MESSCOL "%s" NOCOL "tUpdates your basic info (email, nickname, etc.)n",update_cmd);
  723.             M_print( MESSCOL "%st" NOCOL "tLogs off and quitsn",quit_cmd );
  724.             M_print( MESSCOL "%stt" NOCOL "Sends a multiline message to everyone on your list.n", msga_cmd );
  725.             M_print( MESSCOL "%s uint" NOCOL "Authorize uin to add you to their listn", auth_cmd );
  726.             M_print( MESSCOL "%s uin/message" NOCOL "tSends a message to uinn", message_cmd );
  727.             M_print( MESSCOL "%s uin url message" NOCOL "tSends a url and message to uinn", url_cmd );
  728.             M_print( MESSCOL "%s uin nick" NOCOL "tAdds the uin number to your contact list with nickname.n", add_cmd );
  729.             M_print( MESSCOL "%s message" NOCOL "tSends a message to the last person you sent a message ton", again_cmd);
  730.             M_print( MESSCOL "%s message" NOCOL "tReplys to the last person to send you a messagen", reply_cmd);
  731.             M_print( MESSCOL "%s" NOCOL "ttToggles beeping when recieving new messages.n", sound_cmd);
  732.             M_print( MESSCOL "%s" NOCOL "ttToggles displaying colors.n", color_cmd);
  733.             M_print( CLIENTCOL "tSending a blank message will put the client into multiline mode.ntUse . on a line by itself to end message." NOCOL "n" );
  734. #if 0
  735. M_print( CLIENTCOL "nHmm with the auto command try using auto status message for a change.n ");
  737.             M_print( "The status commands are the same as you normaly use to alter your status." NOCOL "n");
  738. #ifdef FUNNY_MSGS         
  739.             M_print( CLIENTCOL "For me it could be auto dnd Don't disturb me! I'm drinking beer!" NOCOL "n");
  740. #endif
  741. #endif   
  742. }
  744. /****************************************************
  745. Retrieves info a certain user
  746. *****************************************************/
  747. static void Info_Function( SOK_T sok )
  748. {
  749.    char * arg1;
  751.    arg1 = strtok( NULL, "" );
  752.    if ( arg1 == NULL )
  753.    {
  754.       M_print( "Need uin to send ton" );
  755.       return;
  756.    }
  757.    uin = nick2uin( arg1 );
  758.    if ( -1 == uin )
  759.    {
  760.       M_print( "%s not recognized as a nick namen", arg1 );
  761.       return;
  762.    }
  763.    M_print( "%s's IP address is ", arg1 );
  764.    Print_IP( uin );
  765.    M_print( "tThe port is %dn",(WORD) Get_Port( uin ) );
  766.    M_print( "n" );
  767.    send_info_req( sok, uin );
  768.    send_ext_info_req( sok, uin );
  769. }
  771. /**********************************************************
  772. Handles automatic reply messages
  773. ***********************************************************/
  774. static void Auto_Function( SOK_T sok )
  775. {
  776.    char *cmd;
  777.    char *arg1;
  778.    
  779.    cmd = strtok( NULL, "" );
  780.    if ( cmd == NULL )
  781.    {
  782.       M_print( "Automatic replies are %sn", auto_resp ? "On" : "Off" );
  783.       M_print( "The Do not disturb message is: %sn", auto_rep_str_dnd );
  784.       M_print( "The Away message is          : %sn", auto_rep_str_away );
  785.    M_print( "The Not available message is  : %sn", auto_rep_str_na );
  786.      M_print( "The Occupied message is      : %sn", auto_rep_str_occ );
  787.      M_print( "The Invisible message is     : %sn", auto_rep_str_inv );
  788.      return;
  789.    }
  790.    else if ( strcasecmp( cmd, "on" ) == 0 )
  791.    {
  792.       auto_resp = TRUE;
  793.       M_print( "Automatic replies are on.n" );
  794.    }
  795.    else if ( strcasecmp( cmd, "off" ) == 0 )
  796.    {
  797.       auto_resp = FALSE;
  798.       M_print( "Automatic replies are off.n" );
  799.    }
  800.    else
  801.    {
  802.        M_print( "Automatic reply settingn" );
  803.        arg1 = strtok( cmd," ");
  804.      if (arg1 == NULL)
  805.      {
  806.      M_print( "Sorry wrong syntax, can't find a status somewhere.rn");
  807.          return;
  808.      }
  809.   if ( ! strcasecmp (arg1 , dnd_cmd ) )
  810.   {
  811.    cmd = strtok( NULL,"");
  812.    strcpy( auto_rep_str_dnd, cmd);
  813.   }
  814.   else if ( !strcasecmp (arg1 ,away_cmd ))
  815.      {
  816.     cmd = strtok( NULL,"");
  817.     strcpy( auto_rep_str_away,cmd);
  818.      }
  819.      else if ( !strcasecmp (arg1,na_cmd))
  820.      {
  821.       cmd =strtok(NULL,"");
  822.       strcpy(auto_rep_str_na,cmd);
  823.      }
  824.      else if ( !strcasecmp (arg1,occ_cmd))
  825.      {
  826.       cmd = strtok(NULL,"");
  827.       strcpy (auto_rep_str_occ,cmd);
  828.      }
  829.      else if (!strcasecmp (arg1,inv_cmd))
  830.      {
  831.      cmd = strtok(NULL,"");
  832.      strcpy (auto_rep_str_inv,cmd);
  833.      }
  834.      else
  835.      M_print ("Sorry wrong syntax. Read tha help man!rn");
  836.   }
  837. }
  839. /*************************************************************
  840. Alters one of the commands
  841. **************************************************************/
  842. static void Alter_Function( void )
  843. {
  844.    char * cmd;
  845.    
  846.    cmd = strtok (NULL," ");
  847.    if ( cmd == NULL )
  848.    {
  849.      M_print( "Need a command to alter!n" );
  850.      return;
  851.    }
  852.    if ( ! strcasecmp(cmd, auto_cmd))
  853.      strncpy(auto_cmd,strtok(NULL," nt"),16);
  854.    else if ( !strcasecmp(cmd ,message_cmd))
  855.      strncpy(message_cmd,strtok(NULL," nt"),16);
  856.    else if (!strcasecmp(cmd,add_cmd))
  857.      strncpy(add_cmd,strtok(NULL," nt"),16);
  858.    else if (!strcasecmp(cmd,info_cmd))
  859.      strncpy(info_cmd,strtok(NULL," nt"),16);
  860.    else if (!strcasecmp(cmd,quit_cmd))
  861.      strncpy(quit_cmd,strtok(NULL," nt"),16);
  862.    else if (!strcasecmp(cmd,reply_cmd))
  863.         strncpy(reply_cmd,strtok(NULL," nt"),16);
  864.    else if (!strcasecmp(cmd,again_cmd))
  865.            strncpy(again_cmd,strtok(NULL," nt"),16);
  866.    else if (!strcasecmp(cmd,list_cmd))
  867.            strncpy(list_cmd,strtok(NULL," nt"),16);
  868.    else if (!strcasecmp(cmd,away_cmd))
  869.            strncpy(away_cmd,strtok(NULL," nt"),16);
  870.    else if (!strcasecmp(cmd,na_cmd))
  871.            strncpy(na_cmd,strtok(NULL," nt"),16);
  872.    else if (!strcasecmp(cmd,dnd_cmd))
  873.            strncpy(dnd_cmd,strtok(NULL," tn"),16);
  874.    else if (!strcasecmp(cmd,online_cmd))
  875.            strncpy(online_cmd,strtok(NULL," nt"),16);
  876.    else if (!strcasecmp(cmd,occ_cmd))
  877.            strncpy(occ_cmd,strtok(NULL," tn"),16);
  878.    else if (!strcasecmp(cmd,ffc_cmd))
  879.            strncpy(ffc_cmd,strtok(NULL," tn"),16);
  880.    else if (!strcasecmp(cmd,inv_cmd))
  881.             strncpy(inv_cmd,strtok(NULL," tn"),16);
  882.    else if (!strcasecmp(cmd,status_cmd))
  883.            strncpy(status_cmd,strtok(NULL," tn"),16);
  884.    else if (!strcasecmp(cmd,auth_cmd))
  885.            strncpy(status_cmd,strtok(NULL," nt"),16);
  886.    else if (!strcasecmp(cmd,change_cmd))
  887.            strncpy(change_cmd,strtok(NULL," nt"),16);
  888.    else if (!strcasecmp(cmd,search_cmd))
  889.            strncpy(search_cmd,strtok(NULL," tn"),16);
  890.    else if (!strcasecmp(cmd,save_cmd))
  891.            strncpy(save_cmd,strtok(NULL," tn"),16);
  892.    else if (!strcasecmp(cmd,alter_cmd))
  893.            strncpy(alter_cmd,strtok(NULL," tn"),16);
  894.    else if (!strcasecmp(cmd,msga_cmd))
  895.           strncpy(msga_cmd,strtok(NULL," nt"),16);
  896.    else
  897.      M_print("Type help to see your current command, because this  one you typed wasn't one!n");
  898. }
  900. /*************************************************************
  901. Processes user input to send a message to a specified user
  902. **************************************************************/
  903. static void Message_Function( SOK_T sok )
  904. {
  905.    char * arg1;
  906.    
  907.    arg1 = strtok( NULL, UIN_DELIMS );
  908.    if ( arg1 == NULL )
  909.    {
  910.       M_print( "Need uin to send ton" );
  911.       return;
  912.    }
  913.    uin = nick2uin( arg1 );
  914.    if ( -1 == uin )
  915.    {
  916.       M_print( "%s not recognized as a nick namen", arg1 );
  917.       return;
  918.    }
  919.    arg1 = strtok( NULL, "" );
  920.    last_uin = uin;
  921.    if ( arg1 != NULL )
  922.    {
  923.       icq_sendmsg( sok, uin, arg1, NORM_MESS );
  924.       M_print( "Message sent to ");
  925.       Print_UIN_Name( last_uin );
  926.       M_print( "!n");
  927.    }
  928.    else
  929.    {
  930.       status = 1;
  931.       M_print( "msg> " );
  932.       fflush(stdout);
  933.    }
  934. }
  936. /*******************************************************
  937. Sends a reply message to the last person to message you.
  938. ********************************************************/
  939. static void Reply_Function( SOK_T sok )
  940. {
  941.    char * arg1;
  942.    
  943.    if ( last_recv_uin == 0 )
  944.    {
  945.       M_print( "Must receive a message firstn" );
  946.       return;
  947.    }
  948.    arg1 = strtok( NULL, "" );
  949.    last_uin = last_recv_uin;
  950.    if ( arg1 != NULL )
  951.    {
  952.       icq_sendmsg( sok, last_recv_uin, arg1, NORM_MESS );
  953.       M_print( "Message sent to " );
  954.       Print_UIN_Name( last_recv_uin );
  955.       M_print( "n");
  956.    }
  957.    else
  958.    {
  959.       status = 1;
  960.       M_print( "msg> " );
  961.       fflush(stdout);
  962.    }
  963. }
  965. static void Again_Function( SOK_T sok )
  966. {
  967.    char * arg1;
  968.    
  969.    if ( last_uin == 0 )
  970.    {
  971.       M_print( "Must write one message firstn" );
  972.       return;
  973.    }
  974.    arg1 = strtok( NULL, "" );
  975.    if ( arg1 != NULL )
  976.    {
  977.       icq_sendmsg( sok, last_uin, arg1, NORM_MESS );
  978.       M_print( "Message sent to ");
  979.       Print_UIN_Name( last_uin );
  980.       M_print( "!n");  
  981.    } else {
  982.       status = 1;
  983.       M_print( "msg> " );
  984.       fflush(stdout);
  985.    }
  986. }
  988. static void Verbose_Function( void )
  989. {
  990.    char * arg1;
  991.    
  992.    arg1 = strtok( NULL, "" );
  993.    if ( arg1 != NULL )
  994.    {
  995.       Verbose = atoi( arg1 );
  996.    }
  997.    M_print( "Verbosity level is %d.n", Verbose );
  998. }