Поиск ip адресов, на которых запущена определенная программа

// Shvonscan.cpp
//
// Эта программа сканирует указанный диапазон IP адресов.
// При обнаружении цели - любого компьютера в сети,
// выдаёт такие данные, как: имя компьютера, доступные,
// открытые ресурсы и некоторую другую информацию.
//
 
#include "Shvonscan.h"
 
DWORD GStartIP;
DWORD GEndIP;
BOOL GRand;
DWORD GLocalIP;
DWORD GDelay = 100;
WORD GLocalPort = MAGICPORT;
WORD GDestPort = MAGICPORT;
WORD GPacketID = 1;
int GRetry = 3;
DWORD GBroadcastIP = INADDR_BROADCAST;
DWORD GNetmask;
char* GFoundFilename;
char* GLogFilename;
unsigned char GHexvals[16] = {'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'};
 
 
void __cdecl EntryThread(void* parg)
{
    SOCKET udpsock = *((SOCKET*)parg);
    DWORD CurrentIP = GStartIP;
    unsigned char outbuff[1024];
    char checkips[256];
    int x;
    char zeroblock[256];
    memset(zeroblock,0,sizeof(zeroblock));
    DWORD d = OnFormPacket(outbuff);
    SOCKADDR_IN sockaddr;
    sockaddr.sin_family = AF_INET;
    sockaddr.sin_port = htons(GDestPort);
    while( ntohl(CurrentIP) <= ntohl(GEndIP) )
    {
        memset(checkips,1,sizeof(checkips));
        if( (ntohl(GStartIP) & 0xFFFFFF00) == (ntohl(CurrentIP) & 0xFFFFFF00) ) 
            for (x = 0; x < (int)((ntohl(GStartIP) & 0x000000FF)); ++x)
                checkips[x] = 0;
 
        if( (ntohl(GEndIP) & 0xFFFFFF00) == (ntohl(CurrentIP) & 0xFFFFFF00) )
            for( x = (ntohl(GEndIP) & 0x000000FF) + 1; x < sizeof(checkips); ++x )
                checkips[x] = 0;
 
        while( memcmp(checkips,zeroblock,sizeof(checkips))!=0 )
        {
            x = 0;
            if( GRand ) {// Сканировать в случайном порядке ?
                x = rand()%sizeof(checkips);
                while (checkips[x] == 0)
                    x = rand()%sizeof(checkips);
            } else {
                for( x = 0; checkips[x] == 0 && x < sizeof(checkips); ++x );
            }
            checkips[x] = 0;
            sockaddr.sin_addr.s_addr = htonl((ntohl(CurrentIP)&0xFFFFFF00) | x);
            int nRetry = 0;
            while( nRetry < GRetry && Send(udpsock,(const char*)outbuff, d, &sockaddr )==SOCKET_ERROR ) {
                ++nRetry;
                fprintf(stdout,"Error %u sending to %s, Resending...\n",WSAGetLastError(),inet_ntoa(sockaddr.sin_addr));
                Sleep(500);
            }
            if( GDelay )// Задержка при отправке пакета.
                Sleep(GDelay);
        }
        CurrentIP = htonl((ntohl(CurrentIP) & 0xFFFFFF00) + 0x00000100); // increment IP by 1 class C
    }
    fprintf(stdout,"*** Scan done\n");
    GEndIP = 0;
    fflush(stderr);
    fflush(stdout);
    _endthread();
}
 
 
int main(int argc, char* argv[])
{
    int x;
    for( x=1; x<argc; ++x )
    {
        if( argv[x][0]=='-' )
        {
            // Указать способ сканирования (необязательно).
            if( _stricmp(argv[x],"-RAND")==0 )
                GRand = TRUE;
 
            // Подсказка, пример запроса.
            else if( _stricmp(argv[x], "-EXAMPLES")==0 ) {
                Examples();
            }
 
            // Указать определённый IP интерфейс (необязательно).
            else if( _stricmp(argv[x],"-LOCALIP")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -LOCALIP\n");
                    Usage();
                }
                ++x;
                GLocalIP=inet_addr(argv[x]);
                if( GLocalIP==INADDR_NONE ) {
                    fprintf(stdout,"Bad IP: \"%s\"\n", argv[x]);
                    Usage();
                }
            }
            
            // Указать локальный порт для приёма данных (необязательно).
            // Полезно, если порт (по умолчанию 137) используется.
            else if( _stricmp(argv[x],"-PORT")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -PORT\n");
                    Usage();
                }
                ++x;
                GLocalPort = atoi(argv[x]);
            }
            // Указать удаленный порт опроса системы (необязательно).
            // Полезно, использовать отличный по умолчанию 137,
            // в некоторых случаях можно попробовать 139.
            else if( _stricmp(argv[x],"-DESTPORT")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -DESTPORT\n");
                    Usage();
                }
                ++x;
                GDestPort = atoi(argv[x]);
            }
 
            // Указать диапазон адресов (требуется).
            // ( пример: 127.0.0.1 127.0.2.255 )
            else if( _stricmp(argv[x],"-RANGE")==0 ) {
                if( x > argc - 3 ) {
                    fprintf(stdout,"Missing argument for -RANGE\n");
                    Usage();
                }               
                ++x;
                // Начальный IP-адрес.
                GStartIP=inet_addr(argv[x]);
                if( GStartIP==INADDR_NONE ) {
                    fprintf(stdout,"Bad IP: \"%s\"\n",argv[x]);
                    Usage();
                }
                ++x;
                // Конечный IP-адрес.
                GEndIP=inet_addr(argv[x]);
                if( GEndIP==INADDR_NONE) {
                    fprintf(stdout,"Bad IP: \"%s\"\n",argv[x]);
                    Usage();
                }
            }
 
            // Задержка при отправке пакета (необязательно).
            // По умолчанию 100 миллисекунд.
            else if( _stricmp(argv[x],"-DELAY")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -DELAY\n");
                    Usage();
                }
                ++x;
                GDelay = atoi(argv[x]);
            }
 
            // Число раз повторов, отправки пакета,
            // при неудачной отправки пакета (необязательно).
            // По умолчанию, три попытки.
            else if( _stricmp(argv[x],"-RETRY")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -RETRY\n");
                    Usage();
                }
                ++x;
                GRetry = atoi(argv[x]);
            }
 
            // Записывать все полученные данные в файл (необязательно).
            else if( _stricmp(argv[x],"-LOG")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -LOG\n");
                    Usage();
                }
                ++x;
                GLogFilename = argv[x];
            }
 
            // Записывать имена найденых серверов в файл (необязательно).
            else if( _stricmp(argv[x],"-FOUND")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -FOUND\n");
                    Usage();
                }
                ++x;
                GFoundFilename = argv[x];
            }
 
            // Указать широковещательную маску подсети (необязательно).
            else if( _stricmp(argv[x],"-BCASTIP")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -BCASTIP\n");
                    Usage();
                }
                ++x;
                GBroadcastIP=inet_addr(argv[x]);
                if( GBroadcastIP==INADDR_NONE ) {
                    fprintf(stdout,"Bad IP: \"%s\"\n",argv[x]);
                    Usage();
                }
 
            }
 
            // Указать маску подсети (необязательно).
            else if( _stricmp(argv[x],"-NETMASK")==0 ) {
                if( x > argc - 2 ) {
                    fprintf(stdout,"Missing argument for -NETMASK\n");
                    Usage();
                }
                ++x;
                GNetmask = inet_addr(argv[x]);
                if( GNetmask==INADDR_NONE ) {
                    fprintf(stdout,"Bad IP: \"%s\"\n",argv[x]);
                    Usage();
                }
 
            // Прочее.
            } else if( _stricmp(argv[x],"-?")==0 || _stricmp(argv[x],"-HELP")==0 ) {
                if( x > argc - 2 ) Usage();
            } else {
                fprintf(stdout,"Bad option: \"%s\"\n",argv[x]);
                Usage();
            }
        } else {
            fprintf(stdout,"Bad argument: \"%s\"\n",argv[x]);
            Usage();
        }
    }
 
    if( InitWinsock() ) {
        fprintf(stdout,"Cannot start WinSock\n");
        return 1;
    }
    
    srand(GetTickCount());
    StartScan();
    WSACleanup();
    system("pause");
    return 0;
}