C / C++ / MFC

    WSADATA wsd;
    SOCKET cs = INVALID_SOCKET;
    char ref[512];
    char rb[512];
    int iResult, ires, recvbuflen;
    struct sockaddr_in sin;
    char ctrl[3] = {'\r','\n','\0'};
    string str;

    str="";
    iResult = WSAStartup(MAKEWORD(2,2), &wsd);    
    if(iResult!=0) { alert("Cannot init Winsock"); return; }

    cs = socket(AF_INET,  SOCK_STREAM, IPPROTO_TCP);

    sin.sin_family = AF_INET;
    sin.sin_addr.s_addr = inet_addr("127.0.0.1");
    sin.sin_port = htons(27015);

//    ires = connect( cs, (SOCKADDR*) &sin, sizeof(sin) );
    
    bind(cs,(SOCKADDR *)&sin, sizeof(sin));
    BOOL optval = TRUE;
    int bOptLen = sizeof(optval);

    int sokres = setsockopt(cs,SOL_SOCKET,SO_REUSEADDR, (char *)&optval,bOptLen);

    txtMeans.setText("waiting...");
    listen(cs,1);

    int aks = accept(cs,NULL,NULL);    

    do {
            ires = recv(cs,rb,512,0);
//            pint(ires);
            if(ires>0)txtMeans.setText(rb);
            else if(ires==0)txtMeans.appText("Connection Closed");
            else {
                    txtMeans.appText("Receive failed");
                    recvbuflen = WSAGetLastError();
                    getes(recvbuflen);
                
                    if(SOCKET_ERROR==ires)alert("yes");
                    alert(rb);
                }
        }while(ires>0);
     closesocket(cs);

//    alert(str);
    WSACleanup();
    txtMeans.appText("Doni");

$cs = socket_create(AF_INET,SOCK_STREAM,SOL_TCP);
socket_connect($cs,'127.0.0.1',27015);
socket_write($cs,"hehehe");
socket_close($cs);