s = socket(AF_INET, SOCK_RAW, IPPROTO_IP);
   if (s != INVALID_SOCKET)
  {
     addr.sin_family = AF_INET;
     addr.sin_port   = htons(0);
     addr.sin_addr   = ((sockaddr_in*)(*(DWORD*)&addrlist[4]))->sin_addr;
     if (bind(s, (sockaddr*)&addr, sizeof(addr)) != SOCKET_ERROR)
     {
      #define SIO_RCVALL  0x98000001
   
       DWORD optval = 1;
       int  res = WSAIoctl(s, SIO_RCVALL,&optval, sizeof(optval), 0,0,&bytesret,0,0);
       if (res != SOCKET_ERROR)
       {
	   int err=WSAAsyncSelect(s,hWnd,TCP_READ,FD_ACCEPT|FD_READ|FD_WRITE|FD_CONNECT);
       }
     }
  }


   {

  if(WSAGETSELECTERROR(lParam))
      break;
  arg=0;
  ioctlsocket(s,FIONREAD,&arg);
  inquire=new char[arg+2];
  len=recv(s,inquire,arg,0);
  ..... извращаемся
 delete[] inquire;