Как слушать порт (сокеты)

// for socket
#include <stdio.h>
#include <windows.h>
 
int s;
WSADATA lpWSAData;
 
// for debug
#include <conio.h>
 
// for cout, cin, string
#include <iostream>
#include <fstream>
#include <string>
using namespace std;
 
bool SendString(SOCKET s, char *str) 
{
    if (send(s,str,strlen(str),0)==SOCKET_ERROR) return(false); else return(true);
}
 
 
string GetString(SOCKET s) 
{
    char chbuff[100000];
    string return_str;
    
    memset(chbuff, 0, sizeof(chbuff));
    
    while (1) 
        {
                memset(chbuff, 0, strlen(chbuff));
        if(recv (s, chbuff, sizeof(chbuff), 0) == 0)
        {
                return_str += chbuff;
                return return_str;
                } else {
                        return_str += chbuff;
                }
    }
}
 
 
int OpenURL(char *url) {
    string question; // dlya zaprosa
    sockaddr_in ssin;
    hostent* hp;
    char strHlp[2048], *pch; // dlya preobrazovanii
    int PortNum; // nomer porta
    char *http_host; // "http://vk.com:port/ljij/y2/y1" -> "vk.com"
    char *http_path; // "http://vk.com:port/ljij/y2/y1" -> "ljij/y2/y1"
 
    // proverka na duraka. vdrug eto ne http adress
        if (memcmp(url,"HTTP://",7)!=0 && memcmp(url,"http://",7)!=0) return(7);
    
    // propusk "http://". sovsem propusk. kopirovatsa bydet bez http;
        url+=7;
    
    // startuem soketi
    if (WSAStartup(MAKEWORD(1,1),&lpWSAData)!=0) return(1);
    
    // copiruem url ssilki v massiv charov. zachem?
    strcpy(strHlp,url);
    
    // find ':' becouse ":N" is port, where is N = port number
    pch = strchr(strHlp,':');
    
    if (pch==NULL) { // esli port ne zadan, to simvola ':' ne budet
            // togda port = 80
        PortNum = 80;
        
        // find end of adress, becouse [url]www.adress.com/[/url]. see last symbol
        pch = strchr(strHlp,'/');
        
        if (pch!=NULL) // esli est' simvol '\', to smotrim dalneishii pyt'
                {
                        // v massive strHlp obnylaem simvol, chto bi tam ostalsa tol'ko adres
            pch[0] = '\0';
            // put - eto vse, chto posle '\'
            http_path=pch+1;
        } else { // esli puti net, to poshem, chto ego net
            http_path=NULL;
        }
    } else { // esli port vse taki zadan
            // stiraem simvol ':'
        pch[0] = '\0';
        // perexodim na pervuu cifru porta
        pch++;
        // ykazivaem na simvol '/' v pch
        char *pch1 = strchr(pch,'/');
        
        if (pch1!=NULL) { // esli takoy simvol ('\') naiden
                // obnyl9em ego i poluchaetsa, chto pch = N porta
            pch1[0] = '\0';
            // vse, chto posle - path
            http_path=pch1+1;
        } else {
                      // esli simvol ne naiden, to path = null
            http_path=NULL;
        }
        
        // tak kak pch = N porta, nado preobrazovat' ego v int
        PortNum = atoi(pch);
        // proverka na duraka, esli port <= 0
        if(PortNum<=0) PortNum = 80;
    }
 
    // poluchaem ip po imeni adresa saita. "http://vk.com/ksan412" -> "vk.com" -> ip
    hp=gethostbyname(strHlp);
    
    // esli ip ne poluchen
    if (hp==NULL) return(1);
    
    // zadaem http_host
    http_host=strHlp;
        
        // ne vizhu smisla obnyliat ssin
    //memset ((char*)&ssin, 0, sizeof(ssin));
    
    // TCP/IP connect
    ssin.sin_family = AF_INET;
    // magi9
    ssin.sin_addr.s_addr = htonl(INADDR_ANY);
    // nomer porta na yzle seti
    ssin.sin_port = 0;
    
    // zadaem ip i port
    ssin.sin_addr.S_un.S_un_b.s_b1 = hp->h_addr[0];
    ssin.sin_addr.S_un.S_un_b.s_b2 = hp->h_addr[1];
    ssin.sin_addr.S_un.S_un_b.s_b3 = hp->h_addr[2];
    ssin.sin_addr.S_un.S_un_b.s_b4 = hp->h_addr[3];
    ssin.sin_port = htons(PortNum);
    
    // sozdaem socket
    s=socket(AF_INET, SOCK_STREAM, 0);
    // esli on ne sozdan - error
    if (s==INVALID_SOCKET) return(4);
    
    // sv9zivaet socket i sock_addr
    bind (s, (sockaddr *)&ssin, sizeof(ssin));
 
        // vivedem na ekran, k chemy connect idet
    printf("Conecting to %d.%d.%d.%d:%d...",
             (unsigned char)hp->h_addr[0],
             (unsigned char)hp->h_addr[1],
             (unsigned char)hp->h_addr[2],
             (unsigned char)hp->h_addr[3],
                     PortNum
                    );
        
        // esli connect ne ydalsa - error           
    if (connect(s, (sockaddr *)&ssin, sizeof(ssin))==-1) return(3);
    
    // ydalsa
    printf("Ok\n");
        
        // zapros serveru formiruem
        question = string("GET /") + string(http_path) + 
                             string(" HTTP/1.0\nHost: ") + string(http_host) + 
                             string("\nUser-agent: ") + string("Search Engine") + 
                             string("\nAccept: */*\n\n");
 
        // pokazhem zapros
    printf("%s",question.c_str());
        
        // otpravlayem zapros. esli ne otpravilsa - error
    if (!SendString(s,(char*)question.c_str())) return(5);
    
    // polychaem otver
    string stri = GetString(s);
    
    // pechataem otvet
    printf("%s\n\nN_of_symbs = %d",stri.c_str(), stri.length());
    
    return(0);
}
 
 
void CloseURL(void) 
{
    WSACleanup();
}
                         
int main(void) {               
    //int err=OpenURL("http://varyen.ru/");
    int err=OpenURL("http://vk.com/index.php");
    //int err=OpenURL("http://msdn.microsoft.com/en-us/library/windows/desktop/ms740121(v=vs.85).aspx");
    if (err!=0) 
        {
        printf("Error #%d: WSABASEERR+%d\n", err, WSAGetLastError()-WSABASEERR);
    }
    CloseURL();
    while(1);
    return 0;
}