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

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

ICQ/即时通讯

开发平台：

Unix_Linux

util.c：源码内容
  1. /*********************************************
  2. **********************************************
  3. This is a file of general utility functions useful
  4. for programming in general and icq in specific
  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 :  airog (crabbkw@rose-hulman.edu) May 13, 1998
  14. Changes :
  15.   6-18-98 Added support for saving auto reply messages. Fryslan
  16.  
  17. **********************************************
  18. **********************************************/
  19. #include "micq.h"
  20. #include <stdlib.h>
  21. #include <stdio.h>
  22. #include <stdarg.h>
  23. #include <assert.h>
  24. #include <string.h>
  25. #include <ctype.h>
  26. #include <errno.h>
  27. #include <time.h>
  28. #include <sys/types.h>
  29. #include <sys/time.h>
  30. #include <sys/stat.h>
  31. #include <netinet/in.h>
  32. #include <arpa/inet.h>
  33. #include <fcntl.h>
  34. #ifdef _WIN32
  35.    #include <io.h>
  36.    #define S_IRUSR _S_IREAD
  37.    #define S_IWUSR _S_IWRITE
  38. #endif
  39. #ifdef UNIX
  40.    #include <unistd.h>
  41.    #include <termios.h>
  42. #endif
  44. #ifdef UNIX
  45. char *strdup( const char * );
  46. int strcasecmp( const char *, const char * );
  47. int strncasecmp( const char *, const char *, size_t );
  48. #endif
  50. #define   ADD_COMMAND(a, b)     else if ( ! strcasecmp( tmp, a) )   
  51.       {                                                          
  52.       strncpy( b,strtok(NULL," nt"), 16 );                  
  53.       }                                                          
  55. #define   ADD_MESS(a, b)     else if ( ! strcasecmp( tmp, a) )   
  56.       {                                                          
  57.       strncpy( b,strtok(NULL,"n"), 450 );                  
  58.       }                                                          
  60. #define ADD_COLOR(a)      else if ( ! strncmp( str2, a , strlen( a ) ) ) 
  61.       {                                                                 
  62.          if ( Color )                                                   
  63.             printf( a );                                                
  64.          str2 += strlen( a );                                           
  65.       }
  68. static char rcfile[256];
  70. typedef struct 
  71. {
  72.    const char *name;
  73.    WORD code;
  74. } COUNTRY_CODE;
  76. static COUNTRY_CODE Country_Codes[] = { {"USA",1 },
  77.                                  {"Afghanistan", 93 },
  78.  {"Albania", 355 },
  79.                                  {"Algeria", 213 },
  80.                                  {"American Samoa", 684 },
  81.  {"Andorra", 376 },
  82.  {"Angola", 244 },
  83.  {"Anguilla", 101 },
  84.  {"Antigua", 102 },
  85.                                  {"Argentina", 54 },
  86.  {"Armenia", 374 },
  87.                                  {"Aruba", 297 },
  88.  {"Ascention Island", 274 },
  89.                                  {"Australia", 61 },
  90.                                  {"Australian Antartic Territory", 6721 },
  91.                                  {"Austria", 43 },
  92.                                  {"Azerbaijan", 934 },
  93.                                  {"Bahamas", 103 },
  94.                                  {"Bahrain", 973 },
  95.                                  {"Bangladesh", 880 },
  96.                                  {"Barbados", 104 },
  97.                                  {"Belarus", 375 },
  98.                                  {"Belgium", 32 },
  99.                                  {"Belize", 501 },
  100.                                  {"Benin", 229 },
  101.                                  {"Bermuda", 105 },
  102.                                  {"Bhutan", 975 },
  103.                                  {"Bolivia", 591 },
  104.                                  {"Bosnia & Herzegovina", 387 },
  105.                                  {"Botswana", 267 },
  106.                                  {"Brazil",55 },
  107.  {"British Virgin Islands", 106 },
  108.  {"Brunei", 673 },
  109.  {"Bulgaria", 359 },
  110.  {"Burkina Faso", 226 },
  111.  {"Burundi", 257 },
  112.  {"Cambodia", 855 },
  113.                                  {"Cameroon", 237 },
  114.                                  {"Canada",107 },
  115.  {"Cape Verde Islands", 238 },
  116.  {"Cayman Islands", 108},
  117.  {"Central African Republic", 236},
  118.  {"Chad", 235},
  119.  {"Christmas Island", 672},
  120.  {"Cocos-Keeling Islands", 6101},
  121.  {"Comoros", 2691},
  122.  {"Congo", 242},
  123.  {"Cook Islands", 682},
  124.                                  {"Chile", 56 },
  125.                                  {"China", 86 },
  126.                                  {"Columbia", 57 },
  127.                                  {"Costa Rice", 506 },
  128.                                  {"Croatia", 385 }, /* Observerd */
  129.  { "Cuba", 53 },
  130.                                  {"Cyprus", 357 },
  131.                                  {"Czech Republic", 42 },
  132.                                  {"Denmark",45 },
  133.  {"Diego Garcia", 246},
  134.  {"Djibouti", 253},
  135.  {"Dominica", 109},
  136.  {"Dominican Republic", 110},
  137.                                  {"Ecuador", 593 },
  138.                                  {"Egypt", 20 },
  139.                                  {"El Salvador", 503 },
  140.  {"Equitorial Guinea", 240},
  141.  {"Eritrea", 291},
  142.  {"Estonia", 372},
  143.                                  {"Ethiopia", 251 },
  144.  {"F.Y.R.O.M. (Former Yugoslavia)", 389},
  145.  {"Faeroe Islands", 298},
  146.  {"Falkland Islands", 500},
  147.  {"Federated States of Micronesia", 691 },
  148.                                  {"Fiji", 679 },
  149.                                  {"Finland", 358 },
  150.                                  {"France", 33 },
  151.                                  {"French Antilles", 596 },  /* Leave it */
  152.                                  {"French Antilles", 5901 }, /* Either on or the other is right :) */
  153.                                  {"French Guiana", 594 },
  154.                                  {"French Polynesia", 689 },
  155.                                  {"Gabon", 241 },
  156.                                  {"Gambia", 220 },
  157.                                  {"Georgia", 995 },
  158.                                  {"Germany", 49 },
  159.                                  {"Ghana", 233 },
  160.                                  {"Gibraltar", 350 },
  161.                                  {"Greece", 30 },
  162.                                  {"Greenland", 299 },
  163.                                  {"Grenada", 111 },
  164.                                  {"Guadeloupe", 590 },
  165.                                  {"Guam", 671 },
  166.                                  {"Guantanomo Bay", 5399 },
  167.                                  {"Guatemala", 502 },
  168.                                  {"Guinea", 224 },
  169.                                  {"Guinea-Bissau", 245 },
  170.                                  {"Guyana", 592 },
  171.                                  {"Haiti", 509 },
  172.                                  {"Honduras", 504 },
  173.                                  {"Hong Kong", 852 },
  174.                                  {"Hungary", 36 },
  175.                                  {"Iceland", 354 },
  176.                                  {"India", 91 },
  177.                                  {"Indonesia", 62 },
  178.                                  {"INMARSAT", 870 },
  179.                                  {"INMARSAT Atlantic-East", 870 },
  180.                                  {"Iran", 98 },
  181.                                  {"Iraq", 964 },
  182.                                  {"Ireland", 353 },
  183.                                  {"Israel", 972 },
  184.                                  {"Italy", 39 },
  185.                                  {"Ivory Coast", 225 },
  186.                                  {"Japan", 81 },
  187.                                  {"Jordan", 962 },
  188.                                  {"Kenya", 254 },
  189.                                  {"South Korea", 82 },
  190.                                  {"Kuwait", 965 },
  191.                                  {"Liberia", 231 },
  192.                                  {"Libya", 218 },
  193.                                  {"Liechtenstein", 4101 },
  194.                                  {"Luxembourg", 352 },
  195.                                  {"Malawi", 265 },
  196.                                  {"Malaysia", 60 },
  197.                                  {"Mali", 223 },
  198.                                  {"Malta", 356 },
  199.                                  {"Mexico", 52 },
  200.                                  {"Monaco", 33 },
  201.                                  {"Morocco", 212 },
  202.                                  {"Namibia", 264 },
  203.                                  {"Nepal", 977 },
  204.                                  {"Netherlands", 31 },
  205.                                  {"Netherlands Antilles", 599 },
  206.                                  {"New Caledonia", 687 },
  207.                                  {"New Zealand", 64 },
  208.                                  {"Nicaragua", 505 },
  209.                                  {"Nigeria", 234 },
  210.                                  {"Norway",47 }, 
  211.                                  {"Oman", 968 },
  212.                                  {"Pakistan", 92 },
  213.                                  {"Panama", 507 },
  214.                                  {"Papua New Guinea", 675 },
  215.                                  {"Paraguay", 595 },
  216.                                  {"Peru", 51 },
  217.                                  {"Philippines", 63 },
  218.                                  {"Poland", 48 },
  219.                                  {"Portugal", 351 },
  220.                                  {"Qatar", 974 },
  221.                                  {"Romania", 40 },
  222.                                  {"Russia",7 },
  223.                                  {"Saipan", 670 },
  224.                                  {"San Marino", 39 },
  225.                                  {"Saudia Arabia", 966 },
  226.                                  {"Saipan", 670 },
  227.                                  {"Senegal", 221},
  228.                                  {"Singapore", 65 },
  229.                                  {"Slovakia", 42 },
  230.                                  {"South Africa", 27 },
  231.                                  {"Spain", 34 },
  232.                                  {"Sri Lanka", 94 },
  233.                                  {"Suriname", 597 },
  234.                                  {"Sweden",46 },
  235.                                  {"Switzerland", 41 },
  236.                                  {"Taiwan", 886 },
  237.                                  {"Tanzania", 255 },
  238.                                  {"Thailand", 66 },
  239.                                  {"Tunisia", 216 },
  240.                                  {"Turkey", 90 },
  241.                                  {"United Arab Emirates", 971 },
  242.                                  {"Uruguay", 598 },
  243.                                  {"UK",0x2c },
  244.  {"Ukraine", 380 },
  245.                                  {"Vatican City", 39 },
  246.                                  {"Venezuela", 58 },
  247.                                  {"Vietnam", 84 },
  248.                                  {"Yemen", 967 },
  249.                                  {"Yugoslavia", 38 },
  250.                                  {"Zaire", 243 },
  251.                                  {"Zimbabwe", 263 },
  252. #ifdef FUNNY_MSGS
  253.                                  {"Illegal alien",0 },
  254.                                  {"Illegal alien",0xffff } };
  255. #else
  256.                                  {"Not entered",0 },
  257.                                  {"Not entered",0xffff } };
  258. #endif
  262. const char *Get_Country_Name( int code )
  263. {
  264.    int i;
  265.    
  266.    for ( i = 0; Country_Codes[i].code != 0xffff; i++)
  267.    {
  268.       if ( Country_Codes[i].code == code )
  269.       {
  270.          return Country_Codes[i].name;
  271.       }
  272.    }
  273.    if ( Country_Codes[i].code == code )
  274.    {
  275.       return Country_Codes[i].name;
  276.    }
  277.    return NULL;
  278. }
  280. /***************************************************************
  281. Turns keybord echo off for the password
  282. ****************************************************************/
  283. S_DWORD Echo_Off( void )
  284. {
  285. #ifdef UNIX
  286. struct termios attr; /* used for getting and setting terminal
  287. attributes */
  289. /* Now turn off echo */
  290. if (tcgetattr(STDIN_FILENO, &attr) != 0) return(-1);
  291. /* Start by getting current attributes.  This call copies
  292. all of the terminal paramters into attr */
  294. attr.c_lflag &= ~(ECHO);
  295. /* Turn off echo flag.  NOTE: We are careful not to modify any
  296. bits except ECHO */
  297. if (tcsetattr(STDIN_FILENO,TCSAFLUSH,&attr) != 0) return(-2);
  298. /* Wait for all of the data to be printed. */
  299. /* Set all of the terminal parameters from the (slightly)
  300.    modified struct termios */
  301. /* Discard any characters that have been typed but not yet read */
  302. #endif
  303. return 0;
  304. }
  307. /***************************************************************
  308. Turns keybord echo back on after the password
  309. ****************************************************************/
  310. S_DWORD Echo_On( void )
  311. {
  312. #ifdef UNIX
  313. struct termios attr; /* used for getting and setting terminal
  314. attributes */
  316. if (tcgetattr(STDIN_FILENO, &attr) != 0) return(-1);
  318. attr.c_lflag |= ECHO;
  319. if(tcsetattr(STDIN_FILENO,TCSANOW,&attr) != 0) return(-1);
  320. #endif
  321. return 0;
  322. }
  324. /**************************************************************
  325. Same as fM_print but for FD_T's
  326. ***************************************************************/
  327. void M_fdprint( FD_T fd, char *str, ... )
  328. {
  329.    va_list args;
  330.    int k;
  331.    char buf[2048]; /* this should big enough */
  332.         
  333.    assert( buf != NULL );
  334.    assert( 2048 >= strlen( str ) );
  335.    
  336.    va_start( args, str );
  337.    vsprintf( buf, str, args );
  338.    k = write( fd, buf, strlen( buf ) );
  339.    if ( k != strlen( buf ) )
  340.    {
  341.       perror(str);
  342.       exit ( 10);
  343.    }
  344.    va_end( args );
  345. }
  347. /************************************************************
  348. Prints the preformated sting to stdout.
  349. Plays sounds if appropriate.
  350. ************************************************************/
  351. static void M_prints( char *str )
  352. {
  353.    int i;
  354.    
  355.    for ( i=0; str[i] != 0; i++ )
  356.    {
  357.       if ( str[i] != 'a' )
  358.          printf( "%c", str[i] );
  359.       else if ( SOUND_ON == Sound )
  360.          printf( "a" );
  361.       else if ( SOUND_CMD == Sound )
  362.   system ( Sound_Str );
  363.    }
  364. }
  366. /**************************************************************
  367. M_print with colors.
  368. ***************************************************************/
  369. void M_print( char *str, ... )
  370. {
  371.    va_list args;
  372.    char buf[2048];
  373.    char *str1, *str2;
  374.    
  375.    va_start( args, str );
  376. #ifndef CURSES_UI
  377.    vsprintf( buf, str, args );
  378.    str2 = buf;
  379.    while ( (void *) NULL != ( str1 = strchr( str2, 'x1b' ) ) )
  380.    {
  381.       str1[0] = 0;
  382.       M_prints( str2 );
  383.       str1[0] = 0x1B;
  384.       str2 = str1;
  385.       if ( FALSE ) {;}
  386.       ADD_COLOR( NOCOL )
  387.       ADD_COLOR( SERVCOL )
  388.       ADD_COLOR( MESSCOL )
  389.       ADD_COLOR( CONTACTCOL )
  390.       ADD_COLOR( CLIENTCOL )
  391.       else
  392.       {
  393.           str2++;
  394.       }
  395.    }
  396.    M_prints( str2 );
  397. #else
  398.    #error No curses support included yet.
  399.    #error You must add it yourself.
  400. #endif
  401.    va_end( args );
  402. }
  404. /***********************************************************
  405. Reads a line of input from the file descriptor fd into buf
  406. an entire line is read but no more than len bytes are 
  407. actually stored
  408. ************************************************************/
  409. int M_fdnreadln( FD_T fd, char *buf, size_t len )
  410. {
  411.    int i,j;
  412.    char tmp;
  414.    assert( buf != NULL );
  415.    assert( len > 0 );
  416.    tmp = 0;
  417.    len--;
  418.    for ( i=-1; ( tmp != 'n' )  ; )
  419.    {
  420.       if  ( ( i < len ) || ( i == -1 ) )
  421.       {
  422.          i++;
  423.          j = read( fd, &buf[i], 1 );
  424.          tmp = buf[i];
  425.       }
  426.       else
  427.       {
  428.          j = read( fd, &tmp, 1 );
  429.       }
  430.       assert( j != -1 );
  431.       if ( j == 0 )
  432.       {
  433.          buf[i] =  0;
  434.          return -1;
  435.       }
  436.    }
  437.    if ( i < 1 )
  438.    {
  439.       buf[i] = 0;
  440.    }
  441.    else
  442.    {
  443.       if ( buf[i-1] == 'r' )
  444.       {
  445.          buf[i-1] = 0;
  446.       }
  447.       else
  448.       {
  449.          buf[i] = 0;
  450.       }
  451.    } 
  452.    return 0;
  453. }
  455. /********************************************
  456. returns a string describing the status or
  457. a NULL if no such string exists
  458. *********************************************/
  459. char *Convert_Status_2_Str( int status )
  460. {
  461.    if ( STATUS_OFFLINE == status ) /* this because -1 & 0xFFFF is not -1 */
  462.    {
  463.       return "Offline";
  464.    }
  465.    
  466.    switch ( status & 0x1ff )
  467.    {
  468.    case STATUS_ONLINE:
  469.       return "Online";
  470.       break;
  471.    case STATUS_DND:
  472.       return "Do not disturb";
  473.       break;
  474.    case STATUS_AWAY:
  475.       return "Away";
  476.       break;
  477.    case STATUS_OCCUPIED:
  478.       return "Occupied";
  479.       break;
  480.    case STATUS_NA:
  481.    case STATUS_NA_99:
  482.       return "Not available";
  483.       break;
  484.    case STATUS_INVISIBLE:
  485.       return "Invisible";
  486.       break;
  487.    case STATUS_OCCUPIED_MAC:
  488.       return "Occupied (macintosh)";
  489.       break;
  490.    case STATUS_FREE_CHAT:
  491.       return "Free for chat";
  492.       break;
  493.    default :
  494.       return NULL;
  495.       break;
  496.    }
  497. }
  500. /********************************************
  501. Prints a informative string to the screen.
  502. describing the command
  503. *********************************************/
  504. void Print_CMD( WORD cmd )
  505. {
  506.    switch ( cmd )
  507.    {
  508.    case CMD_KEEP_ALIVE:
  509.       M_print( "Keep Alive" );
  510.       break;
  511.    case CMD_KEEP_ALIVE2:
  512.       M_print( "Secondary Keep Alive" );
  513.       break;
  514.    case CMD_CONT_LIST:
  515.       M_print( "Contact List" );
  516.       break;
  517.    case CMD_INVIS_LIST:
  518.       M_print( "Invisible List" );
  519.       break;
  520.    case CMD_VIS_LIST:
  521.       M_print( "Visible List" );
  522.       break;
  523.    case CMD_RAND_SEARCH:
  524.       M_print( "Random Search" );
  525.       break;
  526.    case CMD_RAND_SET:
  527.       M_print( "Set Random" );
  528.       break;
  529.    case CMD_ACK_MESSAGES:
  530.       M_print( "Delete Server Messages" );
  531.       break;
  532.    case CMD_LOGIN_1:
  533.       M_print( "Finish Login" );
  534.       break;
  535.    case CMD_LOGIN:
  536.       M_print( "Login" );
  537.       break;
  538.    case CMD_SENDM:
  539.       M_print( "Send Message" );
  540.       break;
  541.    case CMD_INFO_REQ:
  542.       M_print( "Info Request" );
  543.       break;
  544.    case CMD_EXT_INFO_REQ:
  545.       M_print( "Extended Info Request" );
  546.       break;
  547.    default :
  548.       M_print( "%04X", cmd );
  549.       break;
  550.    }
  551. }
  553. /********************************************
  554. prints out the status of new_status as a string
  555. if possible otherwise as a hex number
  556. *********************************************/
  557. void Print_Status( DWORD new_status  )
  558. {
  559.    if ( Convert_Status_2_Str( new_status ) != NULL )
  560.    {
  561.       M_print( "%s", Convert_Status_2_Str( new_status ) );
  562.       if ( Verbose )
  563.          M_print( " %06X",( WORD ) ( new_status >> 8 ) );
  564.    }
  565.    else
  566.    {
  567.       M_print( "%08lX", new_status );
  568.    }
  569. }
  571. /**********************************************
  572.  * Returns the nick of a UIN if we know it else
  573.  * it will return Unknow UIN
  574.  **********************************************/
  576. char *UIN2nick( DWORD uin)
  577. {
  578.    int i;
  580.    for ( i=0; i < Num_Contacts; i++ )
  581.    {
  582.      if ( Contacts[i].uin == uin )
  583.         break;
  584.    }
  586.    if ( i == Num_Contacts )
  587.    {
  588.       return "Unknow UIN";
  589.   }
  590.    else
  591.   {
  592.       return Contacts[i].nick;
  593.   }
  594. }
  596. /**********************************************
  597. Prints the name of a user or there UIN if name
  598. is not know.
  599. ***********************************************/
  600. int Print_UIN_Name( DWORD uin )
  601. {
  602.    int i;
  603.    
  604.    for ( i=0; i < Num_Contacts; i++ )
  605.    {
  606.       if ( Contacts[i].uin == uin )
  607.          break;
  608.    }
  610.    if ( i == Num_Contacts )
  611.    {
  612.       M_print( CLIENTCOL "%lu" NOCOL, uin );
  613.       return -1 ;
  614.    }
  615.    else
  616.    {
  617.       M_print( "%s%s%s", CONTACTCOL, Contacts[i].nick, NOCOL );
  618.       return i;
  619.    }
  620. }
  622. /*********************************************
  623. Converts a nick name into a uin from the contact
  624. list.
  625. **********************************************/
  626. DWORD nick2uin( char *nick )
  627. {
  628.    int i;
  629.    BOOL non_numeric=FALSE;
  630.    
  631.    for ( i=0; i< Num_Contacts; i++ )
  632.    {
  633.       if ( ! strncasecmp( nick, Contacts[i].nick, 19  ) )
  634.       {
  635.          if ( (S_DWORD) Contacts[i].uin > 0 )
  636.             return Contacts[i].uin;
  637.          else
  638.             return -Contacts[i].uin; /* alias */
  639.       }
  640.    }
  641.    for ( i=0; i < strlen( nick ); i++ )
  642.    {
  643.       if ( ! isdigit( (int) nick[i] ) )
  644.       {
  645.          non_numeric=TRUE;
  646.          break;
  647.       }
  648.    }
  649.    if ( non_numeric )
  650.       return -1; /* not found and not a number */
  651.    else
  652.       return atoi( nick );
  653. }
  655. /**************************************************
  656. Automates the process of creating a new user.
  657. ***************************************************/
  658. void Init_New_User( void )
  659. {
  660.    SOK_T sok; 
  661.    srv_net_icq_pak pak;
  662.    int s;
  663.    struct timeval tv;
  664.    fd_set readfds;
  665. #ifdef _WIN32
  666.    WSADATA wsaData;
  667. #endif
  668.       
  669. #ifdef _WIN32
  670.    i = WSAStartup( 0x0101, &wsaData );
  671.    if ( i != 0 ) {
  672. #ifdef FUNNY_MSGS
  673. perror("Windows Sockets broken blame Bill -");
  674. #else
  675. perror("Sorry, can't initialize Windows Sockets...");
  676. #endif
  677.     exit(1);
  678.    }
  679. #endif
  680.    M_print( "nCreating Connection...n");
  681.    sok = Connect_Remote( server, remote_port, STDERR );
  682.    if ( ( sok == -1 ) || ( sok == 0 ) ) 
  683.    {
  684.     M_print( "Couldn't establish connectionn" );
  685.     exit( 1 );
  686.    }
  687.    M_print( "Sending Request...n" );
  688.    reg_new_user( sok, passwd );
  689.    for ( ; ; )
  690.    {
  691. #ifdef UNIX
  692.   tv.tv_sec = 3;
  693.       tv.tv_usec = 500000;
  694. #else
  695.   tv.tv_sec = 0;
  696.       tv.tv_usec = 100000;
  697. #endif
  699.       FD_ZERO(&readfds);
  700.       FD_SET(sok, &readfds);
  702.       /* don't care about writefds and exceptfds: */
  703.       select(sok+1, &readfds, NULL, NULL, &tv);
  704.       M_print( "Waiting for response....n" );
  705.       if (FD_ISSET(sok, &readfds))
  706.       {
  707.          s = SOCKREAD( sok, &pak.head.ver, sizeof( pak ) - 2  );
  708.          if ( Chars_2_Word( pak.head.cmd ) == SRV_NEW_UIN )
  709.          {
  710.             UIN = Chars_2_DW( pak.head.UIN );
  711.             M_print( "nYour new UIN is %s%ld%s!n",SERVCOL, UIN, NOCOL );
  712.             return;
  713.          }
  714.          else
  715.          {
  716. /*            Hex_Dump( &pak.head.ver, s );*/
  717.          }
  718.       }
  719.       reg_new_user( sok, passwd );
  720.    }
  721. }
  723. static void Initalize_RC_File( void )
  724. {
  725.    FD_T rcf;
  726. /*   time_t t; */
  727.    char passwd2[ sizeof(passwd) ];
  728.    strcpy( server, "icq1.mirabilis.com" );
  729.    remote_port = 4000;
  730. #if 0   
  731.    M_fdprint( rcf, "# This file was generated by Micq of %s %sn",__TIME__,__DATE__);
  732.    t = time( NULL );
  733.    M_fdprint( rcf, "# This file was generated on %s", ctime( &t ) );   
  734. #endif
  735.    M_print( "Enter UIN or 0 for new UIN: #" );
  736.    fflush( stdout );
  737.    scanf( "%ld", &UIN );
  738. password_entry:
  739.    M_print( "Enter password : " );
  740.    fflush( stdout );
  741.    Echo_Off();
  742.    memset( passwd, 0, sizeof( passwd ) );
  743.    M_fdnreadln(STDIN, passwd, sizeof(passwd));
  744.    Echo_On();
  745.    if ( UIN == 0 )
  746.    {
  747.       if ( 0 == passwd[0] )
  748.       {
  749.          M_print( "nMust enter password!n" );
  750.          goto password_entry;
  751.       }
  752.       M_print( "nReenter password to verify: " );
  753.       fflush( stdout );
  754.       Echo_Off();
  755.       memset( passwd2, 0, sizeof( passwd2 ) );
  756.       M_fdnreadln(STDIN, passwd2, sizeof(passwd));
  757.       Echo_On();
  758.       if ( strcmp( passwd, passwd2 ) )
  759.       {
  760.          M_print( "nPasswords did not match reentern" );
  761.          goto password_entry;
  762.       }
  763.       Init_New_User();
  764.    }
  765. #if 0
  766.    M_fdprint( rcf, "UIN %dn", UIN );
  767.    M_fdprint( rcf, "Password %sn", passwd );
  768. #endif
  769.    set_status = STATUS_ONLINE;
  770. #if 0
  771.    M_fdprint( rcf, "Status %dn", STATUS_ONLINE );
  772.    M_fdprint( rcf, "Server %sn", server );
  773.    M_fdprint( rcf, "Port %dn", remote_port );
  774.    M_fdprint( rcf, "#No_Logn" );
  775.    M_fdprint( rcf, "n#Russiann#if you want KOI8-R to CP1251 Russain translation uncomment the above line.n" );
  777.    M_fdprint( rcf, "n# Below are the commands which can be changed to most anything you want :)n" );
  778.    M_fdprint( rcf, "message_cmd msgn");
  779.    M_fdprint( rcf, "info_cmd infon");
  780.    M_fdprint( rcf, "quit_cmd qn");
  781.    M_fdprint( rcf, "reply_cmd rn");
  782.    M_fdprint( rcf, "again_cmd an");
  783.    M_fdprint( rcf, "list_cmd wn");
  784.    M_fdprint( rcf, "away_cmd awayn");
  785.    M_fdprint( rcf, "auto_rep_str_away I told you I wasn't here!n");
  786.    M_fdprint( rcf, "na_cmd nan");
  787.    M_fdprint( rcf, "auto_rep_str_na Working, working always working...n");
  788.    M_fdprint( rcf, "dnd_cmd dndn");
  789. M_fdprint( rcf, "auto_rep_str_dnd Don't page me, my head is hurting!n");
  790.    M_fdprint( rcf, "online_cmd onlinen");
  791.    
  792.    M_fdprint( rcf, "occ_cmd occn");
  793. M_fdprint( rcf, "auto_rep_str_occ I am working on opening this beer so I am busy.n");
  794.    M_fdprint( rcf, "ffc_cmd ffcn");
  795.    M_fdprint( rcf, "inv_cmd invn");
  796. M_fdprint( rcf, "auto_rep_str_inv So you can see me, so you can't!n");
  797.    M_fdprint( rcf, "search_cmd searchn");
  798.    M_fdprint( rcf, "status_cmd statusn");
  799.    M_fdprint( rcf, "auth_cmd authn");
  800.    M_fdprint( rcf, "auto_cmd auton");
  801.    M_fdprint( rcf, "add_cmd addn");
  802.    M_fdprint( rcf, "change_cmd changen");
  803. M_fdprint( rcf, "save_cmd saven");
  804. M_fdprint( rcf, "alter_cmd altern");
  805. M_fdprint( rcf, "msga_cmd msgan");
  806. M_fdprint( rcf, "url_cmd urln");
  807. M_fdprint( rcf, "update_cmd updaten");
  808.  
  810.    
  811.    M_fdprint( rcf, "n# Ok now the contact listn" );
  812.    M_fdprint( rcf, "n# Put a star in front of any UIN # to add them to your visible list.n" );
  813.    M_fdprint( rcf, "Contactsn" );
  814.    M_fdprint( rcf, "11300897 Linux Mastern" );
  815.    M_fdprint( rcf, "11290140 Micq Authorn" );
  816.    M_fdprint( rcf, "alias1n" );
  817.    M_fdprint( rcf, "# ^-- Alias to Micq Authorn" );
  818. #endif
  819.    Num_Contacts = 2;
  820.    Contacts[ 0 ].vis_list = FALSE;
  821.    Contacts[ 1 ].vis_list = FALSE;
  822.    Contacts[0].uin = 11290140;
  823.    strcpy( Contacts[0].nick, "Micq Author" );
  824.    Contacts[0].status = STATUS_OFFLINE;
  825.    Contacts[0].last_time = -1L;
  826.    Contacts[0].current_ip[0] = 0xff;
  827.    Contacts[0].current_ip[1] = 0xff;
  828.    Contacts[0].current_ip[2] = 0xff;
  829.    Contacts[0].current_ip[3] = 0xff;
  830.    Contacts[ 0 ].port = 0;
  831.    Contacts[ 0 ].sok = (SOK_T ) -1L;
  832.    Contacts[1].uin = -11290140;
  833.    strcpy( Contacts[1].nick, "alias1" );
  834.    Contacts[1].status = STATUS_OFFLINE;
  835.    Contacts[1].current_ip[0] = 0xff;
  836.    Contacts[1].current_ip[1] = 0xff;
  837.    Contacts[1].current_ip[2] = 0xff;
  838.    Contacts[1].current_ip[3] = 0xff;
  839.    Contacts[1].current_ip[0] = 0xff;
  840.    Contacts[1].current_ip[1] = 0xff;
  841.    Contacts[1].current_ip[2] = 0xff;
  842.    Contacts[1].current_ip[3] = 0xff;
  843.    Contacts[ 1 ].port = 0;
  844.    Contacts[ 1 ].sok = (SOK_T ) -1L;
  845. #if 0
  846.    close( rcf );
  847. #endif
  848.    
  849. strcpy(message_cmd, "msg");
  850. strcpy(info_cmd, "info");
  851. strcpy(add_cmd, "add");
  852. strcpy(quit_cmd, "q");
  853. strcpy(reply_cmd, "r");       
  854. strcpy(again_cmd, "a");
  855. strcpy(list_cmd, "w");
  856. strcpy(away_cmd, "away");
  857. strcpy(na_cmd, "na");
  858. strcpy(dnd_cmd, "dnd");   
  859. strcpy(online_cmd, "online");
  860. strcpy(occ_cmd, "occ");
  861. strcpy(ffc_cmd, "ffc");
  862. strcpy(inv_cmd, "inv");
  863. strcpy(status_cmd, "status");
  864. strcpy(auth_cmd, "auth");
  865. strcpy(change_cmd, "change");
  866. strcpy(auto_cmd, "auto");
  867. strcpy(search_cmd, "search");
  868. strcpy(save_cmd, "save");
  869. strcpy(alter_cmd, "alter");
  870. strcpy(msga_cmd, "msga");
  871. strcpy(url_cmd, "url");
  872. strcpy(update_cmd, "update");
  873.    
  874.    Current_Status = STATUS_ONLINE;
  875.    
  876.    rcf = open( rcfile, O_RDWR | O_CREAT, S_IRUSR | S_IWUSR);
  877.    if ( rcf == -1 )
  878.    {
  879.       perror( "Error creating config file " );
  880.       exit( 1);
  881.    }
  882.    close( rcf );
  884.    if ( Save_RC() == -1 )
  885.    {
  886.       perror( "Error creating config file " );
  887.       exit( 1);
  888.    }
  889. }
  891. static void Read_RC_File( FD_T rcf )
  892. {
  893.    char buf[450];
  894.    char *tmp;
  895.    int i;
  896. DWORD tmp_uin;
  897.    
  898.    message_cmd[0]='';/* for error checking later */
  899.    quit_cmd[0]='';   /* for error checking later */
  900.    info_cmd[0]='';   /* for error checking later */
  901.    reply_cmd[0]='';  /* for error checking later */
  902.    again_cmd[0]='';  /* for error checking later */
  903.    add_cmd[0]='';    /* for error checking later */
  905.    list_cmd[0]='';   /* for error checking later */
  906.    away_cmd[0]='';   /* for error checking later */
  907.    na_cmd[0]='';     /* for error checking later */
  908.    dnd_cmd[0]='';    /* for error checking later */
  909.    online_cmd[0]=''; /* for error checking later */
  910.    occ_cmd[0]='';    /* for error checking later */
  911.    ffc_cmd[0]='';    /* for error checking later */
  912.    inv_cmd[0]='';    /* for error checking later */
  913.    status_cmd[0]=''; /* for error checking later */
  914.    auth_cmd[0]='';   /* for error checking later */
  915.    auto_cmd[0]='';   /* for error checking later */
  916.    change_cmd[0]=''; /* for error checking later */
  917.    search_cmd[0]=''; /* for error checking later */
  918.    save_cmd[0]='';   /* for error checking later */
  919.    alter_cmd[0]='';  /* for error checking later */
  920.    msga_cmd[0]='';   /* for error checking later */
  921.    url_cmd[0]='';   /* for error checking later */
  922.    update_cmd[0]='';   /* for error checking later */
  923.    Sound_Str[0]='';   /* for error checking later */
  924.    passwd[0] = 0;
  925.    UIN = 0;
  927.    Contact_List = FALSE;
  928.    for ( i=1; !Contact_List || buf == 0; i++ )
  929.    {
  930. /*      M_print( "Starting Line " SERVCOL " %d" NOCOL "n", i );*/
  931.       M_fdnreadln( rcf, buf, sizeof( buf ) );
  932.       if ( ( buf[0] != '#' ) && ( buf[0] != 0 ) )
  933.       {
  934.          tmp = strtok( buf, " " );
  935.          if ( ! strcasecmp( tmp, "Server" ) )
  936.             { strcpy( server, strtok( NULL, " nt" ) ); }
  937.          else if ( ! strcasecmp( tmp, "Password" ) )
  938.             { strcpy( passwd, strtok( NULL, "nt" ) ); }
  939.          else if ( ! strcasecmp( tmp, "Russian" ) )
  940.             {  Russian = TRUE; }
  941.          else if ( ! strcasecmp( tmp, "No_Log" ) )
  942.             { Logging = FALSE;   }
  943.          else if ( ! strcasecmp( tmp, "UIN" ) )
  944.             {  UIN = atoi( strtok( NULL, " nt" ) );         }
  945.          else if ( ! strcasecmp( tmp, "port" ) )
  946.             {  remote_port = atoi( strtok( NULL, " nt" ) ); }
  947.          else if ( ! strcasecmp( tmp, "Status" ) )
  948.             {  set_status = atoi( strtok( NULL, " nt" ) ); }
  949.          else if ( ! strcasecmp( tmp, "Auto" ) )
  950.             { auto_resp = TRUE; }
  951.          ADD_COMMAND( "message_cmd", message_cmd )
  952.          ADD_COMMAND( "info_cmd", info_cmd )
  953.          ADD_COMMAND( "quit_cmd", quit_cmd )
  954.          ADD_COMMAND( "reply_cmd", reply_cmd )
  955.          ADD_COMMAND( "again_cmd", again_cmd )
  956.          ADD_COMMAND( "list_cmd", list_cmd )
  957.          ADD_COMMAND( "away_cmd", away_cmd )
  958.          ADD_MESS( "auto_rep_str_away", auto_rep_str_away )
  959.          ADD_MESS( "auto_rep_str_na", auto_rep_str_na )
  960.          ADD_COMMAND( "na_cmd", na_cmd )
  961.          ADD_COMMAND( "dnd_cmd", dnd_cmd )
  962.          ADD_MESS( "auto_rep_str_dnd", auto_rep_str_dnd )
  963.          ADD_MESS( "auto_rep_str_occ", auto_rep_str_occ )
  964.          ADD_MESS( "auto_rep_str_inv", auto_rep_str_inv )
  965.    else if ( ! strcasecmp( tmp, "Sound" ) ) {  
  966.      strcpy( Sound_Str, strtok( NULL, "nt" ) ); 
  967.      Sound = SOUND_CMD;
  968.    }
  969.          ADD_COMMAND( "online_cmd", online_cmd )
  970.          ADD_COMMAND( "occ_cmd", occ_cmd )
  971.          ADD_COMMAND( "ffc_cmd", ffc_cmd )
  972.          ADD_COMMAND( "inv_cmd", inv_cmd )
  973.          ADD_COMMAND( "status_cmd", status_cmd )
  974.          ADD_COMMAND( "auth_cmd", auth_cmd )
  975.          ADD_COMMAND( "auto_cmd", auto_cmd )
  976.          ADD_COMMAND( "change_cmd", change_cmd )
  977.          ADD_COMMAND( "add_cmd", add_cmd )
  978.          ADD_COMMAND( "search_cmd", search_cmd )
  979.          ADD_COMMAND( "save_cmd", save_cmd )
  980.          ADD_COMMAND( "alter_cmd", alter_cmd )
  981.          ADD_COMMAND( "msga_cmd", msga_cmd )
  982.          ADD_COMMAND( "update_cmd", update_cmd )
  983.          ADD_COMMAND( "url_cmd", url_cmd )
  984.          else if ( ! strcasecmp( tmp, "Contacts" ) )
  985.          {
  986.             Contact_List = TRUE;
  987.          }
  988.          else
  989.          {
  990.             M_print( SERVCOL "Unrecognized command in rc file : %s, ignored." NOCOL "n", tmp );
  991.          }
  992.     }
  993. }
  994.    for ( ; ! M_fdnreadln( rcf, buf, sizeof( buf ) ); )
  995.    {
  996.       if ( Num_Contacts == 100 )
  997.          break;
  998.       if ( ( buf[0] != '#' ) && ( buf[0] != 0 ) )
  999.       {
  1000.          if ( isdigit( (int) buf[0] ) )
  1001.          {
  1002.             Contacts[ Num_Contacts ].uin = atoi( strtok( buf, " " ) );
  1003.             Contacts[ Num_Contacts ].status = STATUS_OFFLINE;
  1004.             Contacts[ Num_Contacts ].last_time = -1L;
  1005.             Contacts[ Num_Contacts ].current_ip[0] = 0xff;
  1006.             Contacts[ Num_Contacts ].current_ip[1] = 0xff;
  1007.             Contacts[ Num_Contacts ].current_ip[2] = 0xff;
  1008.             Contacts[ Num_Contacts ].current_ip[3] = 0xff;
  1009.             tmp = strtok( NULL, "" );
  1010.             if ( tmp != NULL )
  1011.                memcpy( Contacts[ Num_Contacts ].nick, tmp, sizeof( Contacts->nick )  );
  1012.             else
  1013.                Contacts[ Num_Contacts ].nick[0] = 0;
  1014.             if ( Contacts[ Num_Contacts ].nick[19] != 0 )
  1015.                Contacts[ Num_Contacts ].nick[19] = 0;
  1016.             if ( Verbose )
  1017.                M_print( "%ld = %sn", Contacts[ Num_Contacts ].uin, Contacts[ Num_Contacts ].nick );
  1018.             Contacts[ Num_Contacts ].vis_list = FALSE;
  1019.             Num_Contacts++;
  1020.          }
  1021.          else if ( buf[0] == '*' )
  1022.          {
  1023.             Contacts[ Num_Contacts ].uin = atoi( strtok( &buf[1], " " ) );
  1024.             Contacts[ Num_Contacts ].status = STATUS_OFFLINE;
  1025.             Contacts[ Num_Contacts ].last_time = -1L;
  1026.             Contacts[ Num_Contacts ].current_ip[0] = 0xff;
  1027.             Contacts[ Num_Contacts ].current_ip[1] = 0xff;
  1028.             Contacts[ Num_Contacts ].current_ip[2] = 0xff;
  1029.             Contacts[ Num_Contacts ].current_ip[3] = 0xff;
  1030.             tmp = strtok( NULL, "" );
  1031.             if ( tmp != NULL )
  1032.                memcpy( Contacts[ Num_Contacts ].nick, tmp, sizeof( Contacts->nick )  );
  1033.             else
  1034.                Contacts[ Num_Contacts ].nick[0] = 0;
  1035.             if ( Contacts[ Num_Contacts ].nick[19] != 0 )
  1036.                Contacts[ Num_Contacts ].nick[19] = 0;
  1037.             if ( Verbose )
  1038.                M_print( "%ld = %sn", Contacts[ Num_Contacts ].uin, Contacts[ Num_Contacts ].nick );
  1039.             Contacts[ Num_Contacts ].invis_list = FALSE;
  1040.             Contacts[ Num_Contacts ].vis_list = TRUE;
  1041.             Num_Contacts++;
  1042.          }
  1043.          else if ( buf[0] == '~' )
  1044.          {
  1045.             Contacts[ Num_Contacts ].uin = atoi( strtok( &buf[1], " " ) );
  1046.             Contacts[ Num_Contacts ].status = STATUS_OFFLINE;
  1047.             Contacts[ Num_Contacts ].last_time = -1L;
  1048.             Contacts[ Num_Contacts ].current_ip[0] = 0xff;
  1049.             Contacts[ Num_Contacts ].current_ip[1] = 0xff;
  1050.             Contacts[ Num_Contacts ].current_ip[2] = 0xff;
  1051.             Contacts[ Num_Contacts ].current_ip[3] = 0xff;
  1052.             tmp = strtok( NULL, "" );
  1053.             if ( tmp != NULL )
  1054.                memcpy( Contacts[ Num_Contacts ].nick, tmp, sizeof( Contacts->nick )  );
  1055.             else
  1056.                Contacts[ Num_Contacts ].nick[0] = 0;
  1057.             if ( Contacts[ Num_Contacts ].nick[19] != 0 )
  1058.                Contacts[ Num_Contacts ].nick[19] = 0;
  1059.             if ( Verbose )
  1060.                M_print( "%ld = %sn", Contacts[ Num_Contacts ].uin, Contacts[ Num_Contacts ].nick );
  1061.             Contacts[ Num_Contacts ].invis_list = TRUE;
  1062.             Contacts[ Num_Contacts ].vis_list = FALSE;
  1063.             Num_Contacts++;
  1064.          }
  1065.          else
  1066.          {
  1067.             tmp_uin = Contacts[ Num_Contacts - 1 ].uin;
  1068.             tmp = strtok( buf, ", t" ); /* aliases may not have spaces */
  1069.             for ( ; tmp!=NULL; Num_Contacts++ )
  1070.             {
  1071.                Contacts[ Num_Contacts ].uin = -tmp_uin;
  1072.                Contacts[ Num_Contacts ].status = STATUS_OFFLINE;
  1073.                Contacts[ Num_Contacts ].last_time = -1L;
  1074.                Contacts[ Num_Contacts ].current_ip[0] = 0xff;
  1075.                Contacts[ Num_Contacts ].current_ip[1] = 0xff;
  1076.                Contacts[ Num_Contacts ].current_ip[2] = 0xff;
  1077.                Contacts[ Num_Contacts ].current_ip[3] = 0xff;
  1078.                Contacts[ Num_Contacts ].port = 0;
  1079.                Contacts[ Num_Contacts ].sok = (SOK_T ) -1L;
  1080.                Contacts[ Num_Contacts ].invis_list = FALSE;
  1081.                Contacts[ Num_Contacts ].vis_list = FALSE;
  1082.                memcpy( Contacts[ Num_Contacts ].nick, tmp, sizeof( Contacts->nick )  );
  1083.                tmp = strtok( NULL, ", t" );
  1084.             }
  1085.          }
  1086.       }
  1087.    }
  1088.    if(message_cmd[0]=='')
  1089.    strcpy(message_cmd, "msg");
  1090.    if(update_cmd[0]=='')
  1091.    strcpy(update_cmd, "update");
  1092.    if(info_cmd[0]=='')
  1093.    strcpy(info_cmd, "info");
  1094.    if(quit_cmd[0]=='')
  1095.    strcpy(quit_cmd, "q");
  1096.    if(reply_cmd[0]=='')
  1097.    strcpy(reply_cmd, "r");       
  1098.    if(again_cmd[0]=='')
  1099.    strcpy(again_cmd, "a");
  1101.    if(list_cmd[0]=='')
  1102.    strcpy(list_cmd, "w");
  1103.    if(away_cmd[0]=='')
  1104.    strcpy(away_cmd, "away");
  1105.    if(na_cmd[0]=='')
  1106.    strcpy(na_cmd, "na");
  1107.    if(dnd_cmd[0]=='')
  1108.    strcpy(dnd_cmd, "dnd");   
  1109.    if(online_cmd[0]=='')
  1110.    strcpy(online_cmd, "online");
  1111.    if(occ_cmd[0]=='')
  1112.    strcpy(occ_cmd, "occ");
  1113.    if(ffc_cmd[0]=='')
  1114.    strcpy(ffc_cmd, "ffc");
  1115.    if(inv_cmd[0]=='')
  1116.    strcpy(inv_cmd, "inv");
  1117.    if(status_cmd[0]=='')
  1118.    strcpy(status_cmd, "status");
  1119.    if(add_cmd[0]=='')
  1120.    strcpy(add_cmd, "add");
  1121.    if(auth_cmd[0]=='')
  1122.    strcpy(auth_cmd, "auth");
  1123.    if(auto_cmd[0]=='')
  1124.    strcpy(auto_cmd, "auto");
  1125.    if(search_cmd[0]=='')
  1126.    strcpy(search_cmd, "search");
  1127.    if(save_cmd[0]=='')
  1128.    strcpy(save_cmd, "save");
  1129.    if(alter_cmd[0]=='')
  1130.    strcpy(alter_cmd, "alter");
  1131.    if(msga_cmd[0]=='')
  1132.    strcpy(msga_cmd, "msga");
  1133.    if(url_cmd[0]=='')
  1134.    strcpy(url_cmd, "url");
  1137.    if(change_cmd[0]=='')
  1138.    strcpy(change_cmd, "change");
  1139.    if ( Verbose )
  1140.    {
  1141.       M_print( "UIN = %ldn", UIN );
  1142.       M_print( "port = %ldn", remote_port );
  1143.       M_print( "passwd = %sn", passwd );
  1144.       M_print( "server = %sn", server );
  1145.       M_print( "status = %ldn", set_status );
  1146.       M_print( "# of contacts = %dn", Num_Contacts );
  1147.       M_print( "UIN of contact[0] = %ldn", Contacts[0].uin );
  1148.       M_print( "Message_cmd = %sn", message_cmd );
  1149.    }
  1150.    if (UIN == 0 ) 
  1151.    {
  1152.       fprintf( stderr, "Bad .micqrc file.  No UIN found aborting.an" );
  1153.       exit( 1);
  1154.    }
  1155. }
  1157. /*******************************************************
  1158. Gets config info from the rc file in the users home 
  1159. directory.
  1160. ********************************************************/
  1161. void Get_Unix_Config_Info( void )
  1162. {
  1163.    char *path;
  1164.    FD_T rcf;
  1166. #ifdef _WIN32
  1167.    path = ".\";
  1168. #endif
  1170. #ifdef UNIX
  1171.    path = getenv( "HOME" );
  1172.    strcat( path, "/" );
  1173. #endif
  1175. #ifdef __amigaos__
  1176.    path = "PROGDIR:";
  1177. #endif
  1179.    strcpy( rcfile, path );
  1180.    strcat( rcfile, ".micqrc" );
  1181.    rcf = open( rcfile, O_RDONLY );
  1182.    if ( rcf == -1 )
  1183.    {
  1184.       if ( errno == ENOENT ) /* file not found */
  1185.       {
  1186.          Initalize_RC_File();
  1187.       }
  1188.       else
  1189.       {
  1190.          perror( "Error reading config file exiting " );
  1191.          exit( 1 );
  1192.       }
  1193.    }
  1194.    else
  1195.    {
  1196.       Read_RC_File( rcf );
  1197.    }
  1198. }
  1200. void Print_IP( DWORD uin )
  1201. {
  1202.    int i;
  1203. #if 0
  1204.    struct in_addr sin;
  1205. #endif
  1206.    
  1207.    for ( i=0; i< Num_Contacts; i++ )
  1208.    {
  1209.       if ( Contacts[i].uin == uin )
  1210.       {
  1211.          if ( * (DWORD *)Contacts[i].current_ip != -1L )
  1212.          {
  1213.            M_print( "%d.%d.%d.%d", Contacts[i].current_ip[0],
  1214.                                    Contacts[i].current_ip[1],
  1215.                                    Contacts[i].current_ip[2],
  1216.                                    Contacts[i].current_ip[3] );
  1217. #if 0
  1218.             sin.s_addr = Contacts[i].current_ip;
  1219.             M_print( "%s", inet_ntoa( sin ) );
  1220. #endif
  1221.          }
  1222.          else
  1223.          {
  1224.             M_print( "unknown" );
  1225.          }
  1226.          return;
  1227.       }
  1228.    }
  1229.    M_print( "unknown" );
  1230. }
  1232. /************************************************
  1233. Gets the TCP port of the specified UIN
  1234. ************************************************/
  1235. DWORD Get_Port( DWORD uin )
  1236. {
  1237.    int i;
  1238.    
  1239.    for ( i=0; i< Num_Contacts; i++ )
  1240.    {
  1241.       if ( Contacts[i].uin == uin )
  1242.       {
  1243.          return Contacts[i].port;
  1244.       }
  1245.    }
  1246.    return -1L;
  1247. }
  1249. /********************************************
  1250. Converts an intel endian character sequence to
  1251. a DWORD
  1252. *********************************************/
  1253. DWORD Chars_2_DW( unsigned char *buf )
  1254. {
  1255.    DWORD i;
  1256.    
  1257.    i= buf[3];
  1258.    i <<= 8;
  1259.    i+= buf[2];
  1260.    i <<= 8;
  1261.    i+= buf[1];
  1262.    i <<= 8;
  1263.    i+= buf[0];
  1264.    
  1265.    return i;
  1266. }
  1268. /********************************************
  1269. Converts an intel endian character sequence to
  1270. a WORD
  1271. *********************************************/
  1272. WORD Chars_2_Word( unsigned char *buf )
  1273. {
  1274.    WORD i;
  1275.    
  1276.    i= buf[1];
  1277.    i <<= 8;
  1278.    i += buf[0];
  1279.    
  1280.    return i;
  1281. }
  1283. /********************************************
  1284. Converts a DWORD to
  1285. an intel endian character sequence 
  1286. *********************************************/
  1287. void DW_2_Chars( unsigned char *buf, DWORD num )
  1288. {
  1289.    buf[3] = ( unsigned char ) ((num)>>24)& 0x000000FF;
  1290.    buf[2] = ( unsigned char ) ((num)>>16)& 0x000000FF;
  1291.    buf[1] = ( unsigned char ) ((num)>>8)& 0x000000FF;
  1292.    buf[0] = ( unsigned char ) (num) & 0x000000FF;
  1293. }
  1295. /********************************************
  1296. Converts a WORD to
  1297. an intel endian character sequence 
  1298. *********************************************/
  1299. void Word_2_Chars( unsigned char *buf, WORD num )
  1300. {
  1301.    buf[1] = ( unsigned char ) (((unsigned)num)>>8) & 0x00FF;
  1302.    buf[0] = ( unsigned char ) ((unsigned)num) & 0x00FF;
  1303. }
  1305. void Prompt( void )
  1306. {
  1307.    M_print( SERVCOL "Micq> " NOCOL );
  1308.    fflush( stdout );
  1309. }
  1311. void Time_Stamp( void )
  1312. {
  1313.    struct tm *thetime;
  1314.    time_t p;
  1315.    
  1316.    p=time(NULL);
  1317.    thetime=localtime(&p);
  1319.    M_print( "%.02d:%.02d:%.02d",thetime->tm_hour,thetime->tm_min,thetime->tm_sec );
  1320. }
  1322. void Add_User( SOK_T sok, DWORD uin, char *name )
  1323. {
  1324.    FD_T rcf;
  1326.    rcf = open( rcfile, O_RDWR | O_APPEND );
  1327.    M_fdprint( rcf, "%d %sn", uin, name );
  1328.    close( rcf );
  1329.    Contacts[ Num_Contacts ].uin = uin;
  1330.    Contacts[ Num_Contacts ].status = STATUS_OFFLINE;
  1331.    Contacts[ Num_Contacts ].last_time = -1L;
  1332.    Contacts[ Num_Contacts ].current_ip[0] = 0xff;
  1333.    Contacts[ Num_Contacts ].current_ip[1] = 0xff;
  1334.    Contacts[ Num_Contacts ].current_ip[2] = 0xff;
  1335.    Contacts[ Num_Contacts ].current_ip[3] = 0xff;
  1336.    Contacts[ Num_Contacts ].port = 0;
  1337.    Contacts[ Num_Contacts ].sok = (SOK_T ) -1L;
  1338.    Contacts[ Num_Contacts ].vis_list = FALSE;
  1339.    Contacts[ Num_Contacts ].invis_list = FALSE;
  1340.    memcpy( Contacts[ Num_Contacts ].nick, name, sizeof( Contacts->nick )  );
  1341.    Num_Contacts++;
  1342.    snd_contact_list( sok );
  1343. }
  1345. /************************************************
  1346.  *   This function should save your auto reply messages in the rc file.
  1347.  *   NOTE: the code isn't realy neat yet, I hope to change that soon.
  1348.  *   Added on 6-20-98 by Fryslan
  1349.  ***********************************************/
  1350. int Save_RC()
  1351. {
  1352.    FD_T rcf;
  1353.    time_t t;
  1354.    int i, j;
  1355.  
  1356.    rcf = open( rcfile, O_RDWR );
  1357.    if ( rcf == -1 ) return -1;
  1358.    M_fdprint( rcf, "# This file was generated by Micq of %s %sn",__TIME__,__DATE__);
  1359.    t = time( NULL );
  1360.    M_fdprint( rcf, "# This file was generated on %s", ctime( &t ) );   
  1361.    M_fdprint( rcf, "UIN %dn", UIN );
  1362.    M_fdprint( rcf, "Password %sn", passwd );
  1363.    M_fdprint( rcf, "Status %dn", Current_Status );
  1364.    M_fdprint( rcf, "Server %sn", "icq1.mirabilis.com" );
  1365.    M_fdprint( rcf, "Port %dn", 4000 );
  1366.    if ( Logging )
  1367.       M_fdprint( rcf, "#No_Logn" );
  1368.    else
  1369.       M_fdprint( rcf, "No_Logn" );
  1370.    if ( Russian )
  1371.       M_fdprint( rcf, "nRussiann#if you want KOI8-R to CP1251 Russain translation uncomment the above line.n" );
  1372.    else
  1373.       M_fdprint( rcf, "n#Russiann#if you want KOI8-R to CP1251 Russain translation uncomment the above line.n" );
  1374.    if ( auto_resp )
  1375.       M_fdprint( rcf, "n#Automatic responses on.nAuton" );
  1376.    else
  1377.       M_fdprint( rcf, "n#Automatic responses off.n#Auton" );
  1379.    M_fdprint( rcf, "n# Below are the commands which can be changed to most anything you want :)n" );
  1380.    M_fdprint( rcf, "message_cmd %sn",message_cmd);
  1381.    M_fdprint( rcf, "info_cmd %sn",info_cmd);
  1382.    M_fdprint( rcf, "quit_cmd %sn",quit_cmd);
  1383.    M_fdprint( rcf, "reply_cmd %sn",reply_cmd);
  1384.    M_fdprint( rcf, "again_cmd %sn",again_cmd);
  1385.    M_fdprint( rcf, "list_cmd %sn",list_cmd);
  1386.    M_fdprint( rcf, "away_cmd %sn",away_cmd);
  1387.    M_fdprint( rcf, "na_cmd %sn",na_cmd);
  1388.    M_fdprint( rcf, "dnd_cmd %sn",dnd_cmd);
  1389.    M_fdprint( rcf, "online_cmd %sn",online_cmd);
  1390.    
  1391.    M_fdprint( rcf, "occ_cmd %sn",occ_cmd);
  1392.    M_fdprint( rcf, "ffc_cmd %sn",ffc_cmd);
  1393.    M_fdprint( rcf, "inv_cmd %sn",inv_cmd);
  1394.    M_fdprint( rcf, "search_cmd %sn",search_cmd);
  1395.    M_fdprint( rcf, "status_cmd %sn",status_cmd);
  1396.    M_fdprint( rcf, "auth_cmd %sn",auth_cmd);
  1397.    M_fdprint( rcf, "auto_cmd %sn",auto_cmd);
  1398.    M_fdprint( rcf, "add_cmd %sn",add_cmd);
  1399.    M_fdprint( rcf, "change_cmd %sn",change_cmd);
  1400.    M_fdprint( rcf, "save_cmd %sn",save_cmd);
  1401.    M_fdprint( rcf, "alter_cmd %sn",alter_cmd);
  1402.    M_fdprint( rcf, "msga_cmd %sn",msga_cmd);
  1403.    M_fdprint( rcf, "url_cmd %sn",url_cmd);
  1404.    M_fdprint( rcf, "update_cmd %sn",update_cmd);
  1406.    M_fdprint( rcf, "n#Now auto response messagesn" );  
  1407.    M_fdprint( rcf, "auto_rep_str_away %sn",auto_rep_str_away);
  1408.    M_fdprint( rcf, "auto_rep_str_na %sn",auto_rep_str_na);
  1409.    M_fdprint( rcf, "auto_rep_str_dnd %sn",auto_rep_str_dnd);
  1410.    M_fdprint( rcf, "auto_rep_str_occ %sn",auto_rep_str_occ);
  1411.    M_fdprint( rcf, "auto_rep_str_inv %sn",auto_rep_str_inv);
  1414.    M_fdprint( rcf, "n# Ok now the contact listn" );
  1415.    M_fdprint( rcf, "#  Use * in front of the nickname of anyone you want to see you while you're invisble.n" );
  1416.    M_fdprint( rcf, "#  Use ~ in front of the nickname of anyone you want to always see you as offline.n" );
  1417.    M_fdprint( rcf, "#  People in the second group won't show up in your list.n" );
  1418.    M_fdprint( rcf, "Contactsn" );
  1419. /* adding contacts to the rc file. */
  1420. /* we start counting at zero in the index. */
  1422.    for (i=0;i<Num_Contacts;i++)
  1423.    {
  1424.       if ( ! ( Contacts[i].uin & 0x80000000L ) )
  1425.       {
  1426.          if ( Contacts[i].vis_list )
  1427.          {
  1428.             M_fdprint( rcf, "*" );
  1429.          }
  1430.          if ( Contacts[i].invis_list )
  1431.          {
  1432.             M_fdprint( rcf, "~" );
  1433.          }
  1434.  M_fdprint( rcf, "%d %sn",Contacts[i].uin,Contacts[i].nick);
  1435. /*  M_fdprint( rcf, "#Begining of aliases for %sn", Contacts[i].nick ); */
  1436.  for ( j=0; j< Num_Contacts; j++ )
  1437.  {
  1438.     if ( Contacts[j].uin == -Contacts[i].uin )
  1439.     {
  1440.        M_fdprint( rcf, "%s ", Contacts[j].nick );
  1441.     }
  1442.  }
  1443.  M_fdprint( rcf, "n" );
  1444. /*  M_fdprint( rcf, "n#End of aliases for %sn", Contacts[i].nick ); */
  1445.       }
  1446.    }
  1447. M_fdprint( rcf, "n" );
  1448.    return close( rcf );
  1449. }
  1451. /*************************************************************************
  1452.  *      Function: log_event
  1453.  *      Purpose: Log the event provided to the log with a time stamp.
  1454.  *      Andrew Frolov dron@ilm.net
  1455.  *      6-20-98 Added names to the logs. Fryslan
  1456.  *************************************************************************/
  1457. int log_event( char *desc, char *msg, DWORD uin )
  1458. {
  1459.    FILE    *msgfd;
  1460.    char    buffer[256];
  1461.    time_t  timeval;
  1462.    char *path;
  1463.    char *home;
  1465.    if ( ! Logging )
  1466.       return 0;
  1467.       
  1468. #ifdef _WIN32
  1469.    path = ".\";
  1470. #endif
  1472. #ifdef UNIX
  1473.    home = getenv( "HOME" );
  1474.    path = malloc( strlen( home ) + 2 );
  1475.    strcpy( path, home );
  1476.    if ( path[ strlen( path ) - 1 ] != '/' )
  1477.       strcat( path, "/" );
  1478. #endif
  1480. #ifdef __amigaos__
  1481.    path = "PROGDIR:";
  1482. #endif
  1484.    strcpy( buffer, path );
  1485.    strcat( buffer, "micq_log" );
  1488.    if( ( msgfd = fopen(buffer, "a") ) == (FILE *) NULL ) 
  1489.    {
  1490.            fprintf(stderr, "Couldn't open %s for loggingn",
  1491.                             buffer);
  1492.            return(-1);
  1493.    }
  1494.    timeval = time(0);
  1495. if ( ! strcasecmp(UIN2nick(uin),"Unknow UIN"))
  1496.    fprintf(msgfd, "n%-24.24s %s %ldn%sn", ctime(&timeval), desc, uin, msg);
  1497. else
  1498.    fprintf(msgfd, "n%-24.24s %s %sn%sn", ctime(&timeval), desc, UIN2nick(uin), msg);
  1499.  
  1500.    fclose(msgfd);
  1501. #ifdef UNIX
  1502.    chmod( buffer, 0600 );
  1503.    free( path );
  1504. #endif
  1505.    return(0);
  1506. }
  1508. /*************************************************
  1509.  clears the screen 
  1510. **************************************************/
  1511. void clrscr(void)
  1512. {
  1513. #ifdef UNIX
  1514. system( "clear" );
  1515. #else
  1516. #ifdef _WIN32
  1517. system( "cls" );
  1518. #else
  1519. int x;
  1520. char newline = 'n';
  1522.   for(x = 0; x<=25; x++)
  1523. M_print("%c",newline);
  1524. #endif
  1525. #endif
  1526. }
  1528. /************************************************************
  1529. Displays a hex dump of buf on the screen.
  1530. *************************************************************/
  1531. void Hex_Dump( void *buffer, size_t len )
  1532. {
  1533.       int i;
  1534.       int j;
  1535.       char *buf;
  1536.       
  1537.       buf = buffer;
  1538.       assert( len > 0 );
  1539.       assert( len < 1000 );
  1540.       if ( len < 0 )
  1541.        return;
  1542.       for ( i=0 ; i < len; i++ )
  1543.       {
  1544.          M_print( "%02x ", ( unsigned char ) buf[i] );
  1545.          if ( ( i & 15 ) == 15 )
  1546.          {
  1547.             M_print( "  " );
  1548.             for ( j = 15; j >= 0; j-- )
  1549.             {
  1550.                if ( buf[i-j] > 31 )
  1551.                   M_print( "%c", buf[i-j] );
  1552.                else
  1553.                   M_print( "." );
  1554.                if ( ( (i-j) & 3 ) == 3 )
  1555.                   M_print( " " );
  1556.             }
  1557.             M_print( "n" );
  1558.          }
  1559.          else if ( ( i & 7 ) == 7 )
  1560.             M_print( "- " );
  1561.          else if ( ( i & 3 ) == 3 )
  1562.             M_print( "  " );
  1563.       }
  1564.       M_print( "  " );
  1565.       for ( j = i % 16; j > 0; j-- )
  1566.       {
  1567.          if ( buf[i-j] > 31 )
  1568.             M_print( "%c", buf[i-j] );
  1569.          else
  1570.             M_print( "." );
  1571.          if ( ( (i-j) & 3 ) == 3 )
  1572.             M_print( " " );
  1573.       }
  1574.       M_print( "n" );
  1575. }