//默认库
//wsock库/wsock网络库
namespace wsock;
 
//DLL声明
//========================================================  

::Wsock32=  ..raw.loadDll("wsock32.dll")
;;Ws2_32 = ..raw.loadDll("Ws2_32.dll")

//API声明
//========================================================  

//控制一个套接口的模式
_invalid_socket = _INVALID_HANDLE_VALUE;
_INVALID_SOCKET = _INVALID_HANDLE_VALUE;

/*intellisense(wsock)*/  
WSAIoctl = Ws2_32.api("WSAIoctl","int(pointer s,INT dwIoControlCode, struct lpvInBuffer,INT cbInBuffer, struct lpvOutBuffer,INT cbOutBuffer,INT & lpcbBytesReturned,  pointer lpOverlapped,  pointer lpCompletionRoutine )");
htons  = Wsock32.api("htons","WORD( WORD hostshort )" );//主机顺序(端口号)转换成网络顺序。
ntohs = Ws2_32.api("ntohs","INT(INT netshort)") //网络顺序转换到主机顺序(端口号)
//由于Intel处理器和Internet的字节顺序是不同的，上述的转换是无法避免的
htonl = Wsock32.api("htonl","INT(INT a)")
inet_addr = Wsock32.api("inet_addr","INT(string s)") 
ntohl = Wsock32.api("ntohl","INT(INT a)") 
 
WSAStartup  = Wsock32.api("WSAStartup","int(word wVersionRequested,struct &lpWSAData )" );
WSAGetLastError  = Wsock32.api("WSAGetLastError","int()" );
WSASetLastError = ::Wsock32.api("WSASetLastError","void(int iError)")
WSACleanup  = Wsock32.api("WSACleanup","int( )" );
gethostname  = Wsock32.api("gethostname","int(string &szHost , int dwHostLen )" );
gethostbyname  = Wsock32.api("gethostbyname","pointer(string szHost )" );
inet_ntoa  = Wsock32.api("inet_ntoa","string(INT in_addr )" );


gethostbyaddr = Wsock32.api("gethostbyaddr","pointer(string addr,int length,int thetype)")
getpeername = Wsock32.api("getpeername","word(pointer sock,struct& sockaddr,int& sockaddrlen)")
getsockname = Wsock32.api("getsockname","word(pointer sock,struct& sockaddr,int& sockaddrlen)")
shutdown = Wsock32.api("shutdown","word(pointer sock,int how)")

//Windows Sockets规范支持的套接口属性选项都列在对setsockopt()函数和getsockopt()函数的叙述中
getsockoptByInt = Wsock32.api("getsockopt","int(pointer sock,int level,int optname,int&optval,int& optlen)")
setsockoptByInt = Wsock32.api("setsockopt","int(pointer sock,word level,word optname,int& optval,int optlen)")
getsockopt  = Wsock32.api("getsockopt","int(pointer sock,int level,int optname,struct&optval,int& optlen)")
setsockopt = Wsock32.api("setsockopt","int(pointer sock,word level,word optname,struct optval,int optlen)")

/*
_SO_ACCEPTCON  套接口正在监听。 
_SO_BROADCAST 接口被设置为可以发送广播数据。   
_SO_DEBUG 允许Debug。 
_S0_DONTLINGER  如果为真，_SO_LINGER选项被禁止。  
_SO_DONTROUTE 由被禁止。 
_SO_ERROR 得到并且清除错误状态。 
_SO_KEEPALIVE 活跃信息正在被发送。  
_SO_LINGER 返回目前的linger信息。 
_SO_OOBINLINE 外数据正在普通数据流中被接收。  
_SO_RCVBUF  接收缓冲区大小。 决定于实现  
_SO_REUSEADDR 该套接口捆绑的地址 否可被其他人使用。  
_SO_SNDBUF 发送缓冲区大小。 决定于实现  
_SO_TYPE  套接口类型（如; 套接口被SOCK_STREAM）。  
_TCP_NODELAY 禁止采用Nagle 决定于实现进行合并传送。 
*/

ioctlsocket = Wsock32.api("ioctlsocket","word(pointer sock,int cmd, INT &argp)")
recvfrom = Wsock32.api("recvfrom","word(pointer sock,string& Buf,int length,int flags, struct& sad, int& fromlen)")
sendto = Wsock32.api("sendto","word(pointer sock,string Buf,int length,int flags, struct& sad, int& tolen)")
    
_select = Wsock32.api("select","word(int nfds, pointer& readfds, pointer& writefds, pointer& exceptfds, struct& timeout)")

socket  = Wsock32.api("socket","pointer( int af,  int type,  int protoco )" );
recv  = Wsock32.api("recv","int( pointer s,string& buf,  int len,int flags )" );   
bind  = Wsock32.api("bind","int(pointer s, struct name, int namelen )" );  

connect = Wsock32.api("connect","word(pointer sock,struct& sockstruct,int structlen)")
send = Wsock32.api("send","word(pointer sock,string msg,int msglen,int flag)") 
listen = Wsock32.api("listen","word(pointer sock,int backlog)")
closesocket = Wsock32.api("closesocket","word(pointer sock)")
accept = Wsock32.api("accept","pointer(pointer sock,int sad,int sadlen)")

//异步选择函数WSAAsyncSelect()允许应用程序提名一个或多个感兴趣的网络事件,如_FD_ READ,_FD_WRITE,_FD_CONNECT,_FD_ACCEPT等等代表的网络事件.
//当被提名的网络事件发生时,Win dows应用程序的窗口函数将收到一个消息.这样就可以实现事件驱动了
WSAAsyncSelect = Wsock32.api("WSAAsyncSelect","int(pointer sock,int hwnd,int Message,int event)")
WSAFDIsSet = Wsock32.api("__WSAFDIsSet","word(int s,struct& passed_set)")

//异步请求函数允许应用程序用异步方式获得请求的信息,如WSAAsyncGet***By***()类函数. 
WSAAsyncGetHostByAddr = Wsock32.api("WSAAsyncGetHostByAddr","int(int hwnd,int wMsg,string addr,int length,int utype,string buff,int buflen)")
WSAAsyncGetHostByName = Wsock32.api("WSAAsyncGetHostByName","int(int hwnd,int wMsg,string name,string Buf,int buflen)")
WSAAsyncGetProtoByName = Wsock32.api("WSAAsyncGetProtoByName","int(int hwnd,int wMsg,string name,string Buf,int buflen)")
WSAAsyncGetProtoByNumber = Wsock32.api("WSAAsyncGetProtoByNumber","int(int hwnd,int wMsg,int number,string Buf,int buflen)")
WSAAsyncGetServByName = Wsock32.api("WSAAsyncGetServByName","int(int hwnd,int wMsg,string name,string proto,string Buf,int buflen)")
WSAAsyncGetServByPort = Wsock32.api("WSAAsyncGetServByPort","int(int hwnd,int wMsg,word Port,string proto,string Buf,int buflen)")

WSACancelAsyncRequest = Wsock32.api("WSACancelAsyncRequest","int(int taskhandle)")
//取消一个阻塞的调用.
WSACancelBlockingCall = Wsock32.api("WSACancelBlockingCall","int()")
//函数WSAIsBlocking()可以检测是否阻塞
WSAIsBlocking = Wsock32.api("WSAIsBlocking","int()")
//WINSOCK提供了"钩子函数"负责处理Windows消息,使Windows的消息循环能够继续.
//WINSOCK提供了两个函数(WSASetBlockingHook()和WSAUnhookBlockingHook()) 让应用程序设置或取消自己的"钩子函数".
WSAUnhookBlockingHook= Wsock32.api("WSAUnhookBlockingHook","int()");
WSASetBlockingHook= Wsock32.api("WSASetBlockingHook","pointer( pointer lpBlockFunc)");

 

//结构体声明
//========================================================   

//SOCKET 类型就是无符号32位整数，在AAuto译为"INT"

in_addr = class {
	union S_un = {
		struct S_un_b = { BYTE s_b1;BYTE s_b2;BYTE s_b3;BYTE s_b4 } ;
		struct S_un_w = { WORD s_w1;WORD s_w2; } ;
		INT S_addr;
	} 
} 
var in_addr =  in_addr;

sockaddr_in = class { 
    word   sin_family;   
    WORD sin_port;
    struct sin_addr=in_addr();
    BYTE sin_zero[8];
}   
var sockaddr_in = sockaddr_in;



WSAData = class {
	WORD          wVersion;
	WORD          wHighVersion; 
	byte          szDescription[257];
	byte          szSystemStatus[257];
	WORD          iMaxSockets;
	WORD          iMaxUdpDg;
	string        lpVendorInfo; 
}
var WSAData = WSAData; 


hostent = class{  
     string h_name;
     pointer h_aliases;
     word h_addrtype;
     word h_length;
     pointer h_addr_list;
}; 
var hostent = hostent;

timeval= class{ 
  int tv_sec; 
  int tv_usec; 
}

sockaddr = class{ 
  WORD sa_family; 
  BYTE sa_data[14];
}

sockprotoT= class{ 
  WORD sp_family; 
  WORD sp_protocol; 
}
/*end intellisense*/

wVersionRequired = 0x202;//可使用的最高版本　/* Confirm that the WinSock DLL supports 2.2.*/
var wsadata = WSAData();
_ERROR_SUCCESS = 0; 
var sockopen_count = 0;

 
open = function(){ 
    //开启winsock，使用其他函数以前，必须调用此函数进行初始化
    sockopen_count++; 
	var iReturn = WSAStartup(wVersionRequired , wsadata)  
	if(iReturn != 0x0/*_ERROR_SUCCESS*/) 
	    return null, WSAGetLastError() 
 
	return true;
}
 
close = function(){
    //释放winsock，也wsock配对使用
	sockopen_count--;
	
	if( sockopen_count <= 0 ) 
		 WSACleanup(); 
}

/*
//用法示例
import wsock;
io.open()
//可返回一个或多个IP
io.print( wsock.getIp("www.baidu.com") )
*/
getIp = function(domain)begin
    //将域名转换为IP地址
	if(sockopen_count<=0) 
     	self.open();
    
	var h = gethostbyname(domain);
	
	var entity = ..raw.convert(h,hostent());
	
	select( entity.h_addrtype ) {
	
		case 0x2/*_AF_INET*/,23/*_AF_INET6 */
		{  
	    	//创建动态数组
	    	var addrlist = ..raw.toarray( entity.h_length,"pointer" )  
	    	
	    	//将指针转换为数组值, raw.convert类似(&)取值操作符
	    	..raw.convert(entity.h_addr_list,addrlist);//得到的是一个数组，数组的元素是in_addr*指针，实际上就是int *指针
	    	
	    	var ipstr = {};
	    	for(i=1;entity.h_length;1){
	       		var int_addr_ptr = addrlist.array[i];
	       		if(!int_addr_ptr)
	           		break ; //最后一个有效指针尾部是空指针
	       		
	        	//将指针转换为值，这句类似C++里的 int int_addr = *((int *)int_addr_ptr)
	       		var int_addr = ..raw.convert( int_addr_ptr, {int addr} ) 
	       		..table.insert( ipstr ,inet_ntoa(int_addr.addr) )
	    	}
	     	
	    	return ..table.unpack(ipstr);
		}
		else
		{
		}
	
	}
	return null;
end

/**intellisense(wsock)
open() = 使用wsock库以前必须调用此函数注册
close() = 使用wsock库以后必须调用此函数释放\n与wsock.open()配对使用
getIp("__/*请输入域名*/") = 解析域名,可返回一个或多个IP
_invalid_socket = @_INVALID_SOCKET
end intellisense**/

/*intellisense()
!in_addr.S_un.S_addr = 
!in_addr.S_un.S_un_b.s_b1 = 
!in_addr.S_un.S_un_b.s_b2 = 
!in_addr.S_un.S_un_b.s_b4 = 
!in_addr.S_un.S_un_w.s_w1 = 
!in_addr.S_un.S_un_w.s_w2 =  
?wsock.in_addr  = !in_addr.
!sockaddr_in.sin_family = 
!sockaddr_in.sin_port =  
!sockaddr_in.sin_addr = !in_addr.
!sockaddr_in.sin_zero
?wsock.sockaddr_in = !sockaddr_in.
end intellisense*/

/*常量智能提示{{*/
/**intellisense()
_AF_INET6=@23/*_AF_INET6*/
_FD_SETSIZE=@0x40/*_FD_SETSIZE*/
_IOCPARM_MASK=@0x7F/*_IOCPARM_MASK*/
_IOC_VOID=@0x20000000/*_IOC_VOID*/
_IOC_OUT=@0x40000000/*_IOC_OUT*/
_IOC_IN=@0x80000000/*_IOC_IN*/
_IPPROTO_HOPOPTS=@0x0/*_IPPROTO_HOPOPTS*/
_IPPROTO_ICMP=@0x1/*_IPPROTO_ICMP*/
_IPPROTO_IGMP=@0x2/*_IPPROTO_IGMP*/
_IPPROTO_GGP=@0x3/*_IPPROTO_GGP*/
_IPPROTO_IPV4=@0x4/*_IPPROTO_IPV4*/
_IPPROTO_ST=@0x5/*_IPPROTO_ST*/
_IPPROTO_TCP=@0x6/*_IPPROTO_TCP*/
_IPPROTO_CBT=@0x7/*_IPPROTO_CBT*/
_IPPROTO_EGP=@0x8/*_IPPROTO_EGP*/
_IPPROTO_IGP=@0x9/*_IPPROTO_IGP*/
_IPPROTO_PUP=@0xC/*_IPPROTO_PUP*/
_IPPROTO_UDP=@0x11/*_IPPROTO_UDP*/
_IPPROTO_IDP=@0x16/*_IPPROTO_IDP*/
_IPPROTO_RDP=@0x1B/*_IPPROTO_RDP*/
_IPPROTO_IPV6=@0x29/*_IPPROTO_IPV6*/
_IPPROTO_ROUTING=@0x2B/*_IPPROTO_ROUTING*/
_IPPROTO_FRAGMENT=@0x2C/*_IPPROTO_FRAGMENT*/
_IPPROTO_ESP=@0x32/*_IPPROTO_ESP*/
_IPPROTO_AH=@0x33/*_IPPROTO_AH*/
_IPPROTO_ICMPV6=@0x3A/*_IPPROTO_ICMPV6*/
_IPPROTO_NONE=@0x3B/*_IPPROTO_NONE*/
_IPPROTO_DSTOPTS=@0x3C/*_IPPROTO_DSTOPTS*/
_IPPROTO_ND=@0x4D/*_IPPROTO_ND*/
_IPPROTO_ICLFXBM=@0x4E/*_IPPROTO_ICLFXBM*/
_IPPROTO_PIM=@0x67/*_IPPROTO_PIM*/
_IPPROTO_PGM=@0x71/*_IPPROTO_PGM*/
_IPPROTO_L2TP=@0x73/*_IPPROTO_L2TP*/
_IPPROTO_SCTP=@0x84/*_IPPROTO_SCTP*/
_IPPROTO_RAW=@0xFF/*_IPPROTO_RAW*/
_IPPROTO_MAX=@0x100/*_IPPROTO_MAX*/
_IPPROTO_RESERVED_RAW=@0x101/*_IPPROTO_RESERVED_RAW*/
_IPPROTO_RESERVED_IPSEC=@0x102/*_IPPROTO_RESERVED_IPSEC*/
_IPPROTO_RESERVED_IPSECOFFLOAD=@0x103/*_IPPROTO_RESERVED_IPSECOFFLOAD*/
_IPPROTO_RESERVED_MAX=@0x104/*_IPPROTO_RESERVED_MAX*/
_IPPORT_ECHO=@0x7/*_IPPORT_ECHO*/
_IPPORT_DISCARD=@0x9/*_IPPORT_DISCARD*/
_IPPORT_SYSTAT=@0xB/*_IPPORT_SYSTAT*/
_IPPORT_DAYTIME=@0xD/*_IPPORT_DAYTIME*/
_IPPORT_NETSTAT=@0xF/*_IPPORT_NETSTAT*/
_IPPORT_FTP=@0x15/*_IPPORT_FTP*/
_IPPORT_TELNET=@0x17/*_IPPORT_TELNET*/
_IPPORT_SMTP=@0x19/*_IPPORT_SMTP*/
_IPPORT_TIMESERVER=@0x25/*_IPPORT_TIMESERVER*/
_IPPORT_NAMESERVER=@0x2A/*_IPPORT_NAMESERVER*/
_IPPORT_WHOIS=@0x2B/*_IPPORT_WHOIS*/
_IPPORT_MTP=@0x39/*_IPPORT_MTP*/
_IPPORT_TFTP=@0x45/*_IPPORT_TFTP*/
_IPPORT_RJE=@0x4D/*_IPPORT_RJE*/
_IPPORT_FINGER=@0x4F/*_IPPORT_FINGER*/
_IPPORT_HTTP=@0x50/*_IPPORT_HTTP*/
_IPPORT_TTYLINK=@0x57/*_IPPORT_TTYLINK*/
_IPPORT_SUPDUP=@0x5F/*_IPPORT_SUPDUP*/
_IPPORT_EXECSERVER=@0x200/*_IPPORT_EXECSERVER*/
_IPPORT_LOGINSERVER=@0x201/*_IPPORT_LOGINSERVER*/
_IPPORT_CMDSERVER=@0x202/*_IPPORT_CMDSERVER*/
_IPPORT_EFSSERVER=@0x208/*_IPPORT_EFSSERVER*/
_IPPORT_BIFFUDP=@0x200/*_IPPORT_BIFFUDP*/
_IPPORT_WHOSERVER=@0x201/*_IPPORT_WHOSERVER*/
_IPPORT_ROUTESERVER=@0x208/*_IPPORT_ROUTESERVER*/
_IPPORT_RESERVED=@0x400/*_IPPORT_RESERVED*/
_IMPLINK_IP=@0x9B/*_IMPLINK_IP*/
_IMPLINK_LOWEXPER=@0x9C/*_IMPLINK_LOWEXPER*/
_IMPLINK_HIGHEXPER=@0x9E/*_IMPLINK_HIGHEXPER*/
_IN_CLASSA_NET=@0xFF000000/*_IN_CLASSA_NET*/
_IN_CLASSA_NSHIFT=@0x18/*_IN_CLASSA_NSHIFT*/
_IN_CLASSA_HOST=@0xFFFFFF/*_IN_CLASSA_HOST*/
_IN_CLASSA_MAX=@0x80/*_IN_CLASSA_MAX*/
_IN_CLASSB_NET=@0xFFFF0000/*_IN_CLASSB_NET*/
_IN_CLASSB_NSHIFT=@0x10/*_IN_CLASSB_NSHIFT*/
_IN_CLASSB_HOST=@0xFFFF/*_IN_CLASSB_HOST*/
_IN_CLASSB_MAX=@0x10000/*_IN_CLASSB_MAX*/
_IN_CLASSC_NET=@0xFFFFFF00/*_IN_CLASSC_NET*/
_IN_CLASSC_NSHIFT=@0x8/*_IN_CLASSC_NSHIFT*/
_IN_CLASSC_HOST=@0xFF/*_IN_CLASSC_HOST*/
_INADDR_ANY=@0x0/*_INADDR_ANY*/
_INADDR_LOOPBACK=@0x7F000001/*_INADDR_LOOPBACK*/
_INADDR_BROADCAST=@-1/*_INADDR_BROADCAST*/
_INADDR_NONE=@-1/*_INADDR_NONE*/
_WSADESCRIPTION_LEN=@0x100/*_WSADESCRIPTION_LEN*/
_WSASYS_STATUS_LEN=@0x80/*_WSASYS_STATUS_LEN*/
_IP_OPTIONS=@0x1/*_IP_OPTIONS*/
_SOCK_STREAM=@0x1/*_SOCK_STREAM*/
_SOCK_DGRAM=@0x2/*_SOCK_DGRAM*/
_SOCK_RAW=@0x3/*_SOCK_RAW*/
_SOCK_RDM=@0x4/*_SOCK_RDM*/
_SOCK_SEQPACKET=@0x5/*_SOCK_SEQPACKET*/
_SO_DEBUG=@0x1/*_SO_DEBUG*/
_SO_ACCEPTCONN=@0x2/*_SO_ACCEPTCONN*/
_SO_REUSEADDR=@0x4/*_SO_REUSEADDR*/
_SO_KEEPALIVE=@0x8/*_SO_KEEPALIVE*/
_SO_DONTROUTE=@0x10/*_SO_DONTROUTE*/
_SO_BROADCAST=@0x20/*_SO_BROADCAST*/
_SO_USELOOPBACK=@0x40/*_SO_USELOOPBACK*/
_SO_LINGER=@0x80/*_SO_LINGER*/
_SO_OOBINLINE=@0x100/*_SO_OOBINLINE*/
_SO_SNDBUF=@0x1001/*_SO_SNDBUF*/
_SO_RCVBUF=@0x1002/*_SO_RCVBUF*/
_SO_SNDLOWAT=@0x1003/*_SO_SNDLOWAT*/
_SO_RCVLOWAT=@0x1004/*_SO_RCVLOWAT*/
_SO_SNDTIMEO=@0x1005/*_SO_SNDTIMEO*/
_SO_RCVTIMEO=@0x1006/*_SO_RCVTIMEO*/
_SO_ERROR=@0x1007/*_SO_ERROR*/
_SO_TYPE=@0x1008/*_SO_TYPE*/
_TCP_NODELAY=@0x1/*_TCP_NODELAY*/
_AF_UNSPEC=@0x0/*_AF_UNSPEC*/
_AF_UNIX=@0x1/*_AF_UNIX*/
_AF_INET=@0x2/*_AF_INET*/
_AF_IMPLINK=@0x3/*_AF_IMPLINK*/
_AF_PUP=@0x4/*_AF_PUP*/
_AF_CHAOS=@0x5/*_AF_CHAOS*/
_AF_NS=@0x6/*_AF_NS*/
_AF_ISO=@0x7/*_AF_ISO*/
_AF_OSI=@0x7/*_AF_OSI*/
_AF_ECMA=@0x8/*_AF_ECMA*/
_AF_DATAKIT=@0x9/*_AF_DATAKIT*/
_AF_CCITT=@0xA/*_AF_CCITT*/
_AF_SNA=@0xB/*_AF_SNA*/
_AF_DECNET=@0xC/*_AF_DECNET*/
_AF_DLI=@0xD/*_AF_DLI*/
_AF_LAT=@0xE/*_AF_LAT*/
_AF_HYLINK=@0xF/*_AF_HYLINK*/
_AF_APPLETALK=@0x10/*_AF_APPLETALK*/
_AF_NETBIOS=@0x11/*_AF_NETBIOS*/
_AF_MAX=@0x12/*_AF_MAX*/
_PF_UNSPEC=@0x0/*_PF_UNSPEC*/
_PF_UNIX=@0x1/*_PF_UNIX*/
_PF_INET=@0x2/*_PF_INET*/
_PF_IMPLINK=@0x3/*_PF_IMPLINK*/
_PF_PUP=@0x4/*_PF_PUP*/
_PF_CHAOS=@0x5/*_PF_CHAOS*/
_PF_NS=@0x6/*_PF_NS*/
_PF_ISO=@0x7/*_PF_ISO*/
_PF_OSI=@0x7/*_PF_OSI*/
_PF_ECMA=@0x8/*_PF_ECMA*/
_PF_DATAKIT=@0x9/*_PF_DATAKIT*/
_PF_CCITT=@0xA/*_PF_CCITT*/
_PF_SNA=@0xB/*_PF_SNA*/
_PF_DECNET=@0xC/*_PF_DECNET*/
_PF_DLI=@0xD/*_PF_DLI*/
_PF_LAT=@0xE/*_PF_LAT*/
_PF_HYLINK=@0xF/*_PF_HYLINK*/
_PF_APPLETALK=@0x10/*_PF_APPLETALK*/
_PF_NETBIOS=@0x11/*_PF_NETBIOS*/
_PF_MAX=@0x12/*_PF_MAX*/
_SOL_SOCKET=@0xFFFF/*_SOL_SOCKET*/
_SOMAXCONN=@0x5/*_SOMAXCONN*/
_MSG_OOB=@0x1/*_MSG_OOB*/
_MSG_PEEK=@0x2/*_MSG_PEEK*/
_MSG_DONTROUTE=@0x4/*_MSG_DONTROUTE*/
_MSG_MAXIOVLEN=@0x10/*_MSG_MAXIOVLEN*/
_FD_READ=@0x1/*_FD_READ*/
_FD_WRITE=@0x2/*_FD_WRITE*/
_FD_OOB=@0x4/*_FD_OOB*/
_FD_ACCEPT=@0x8/*_FD_ACCEPT*/
_FD_CONNECT=@0x10/*_FD_CONNECT*/
_FD_CLOSE=@0x20/*_FD_CLOSE*/
_WSABASEERR=@0x2710/*_WSABASEERR*/
_WSAEINTR=@0x2714/*_WSAEINTR*/
_WSAEBADF=@0x2719/*_WSAEBADF*/
_WSAEACCES=@0x271D/*_WSAEACCES*/
_WSAEFAULT=@0x271E/*_WSAEFAULT*/
_WSAEINVAL=@0x2726/*_WSAEINVAL*/
_WSAEMFILE=@0x2728/*_WSAEMFILE*/
_WSAEWOULDBLOCK=@0x2733/*_WSAEWOULDBLOCK*/
_WSAEINPROGRESS=@0x2734/*_WSAEINPROGRESS*/
_WSAEALREADY=@0x2735/*_WSAEALREADY*/
_WSAENOTSOCK=@0x2736/*_WSAENOTSOCK*/
_WSAEDESTADDRREQ=@0x2737/*_WSAEDESTADDRREQ*/
_WSAEMSGSIZE=@0x2738/*_WSAEMSGSIZE*/
_WSAEPROTOTYPE=@0x2739/*_WSAEPROTOTYPE*/
_WSAEPROTOOPT=@0x273A/*_WSAEPROTOOPT*/
_WSAEPROTONOSUPPORT=@0x273B/*_WSAEPROTONOSUPPORT*/
_WSAESOCKTNOSUPPORT=@0x273C/*_WSAESOCKTNOSUPPORT*/
_WSAEOPNOTSUPP=@0x273D/*_WSAEOPNOTSUPP*/
_WSAEPFNOSUPPORT=@0x273E/*_WSAEPFNOSUPPORT*/
_WSAEAFNOSUPPORT=@0x273F/*_WSAEAFNOSUPPORT*/
_WSAEADDRINUSE=@0x2740/*_WSAEADDRINUSE*/
_WSAEADDRNOTAVAIL=@0x2741/*_WSAEADDRNOTAVAIL*/
_WSAENETDOWN=@0x2742/*_WSAENETDOWN*/
_WSAENETUNREACH=@0x2743/*_WSAENETUNREACH*/
_WSAENETRESET=@0x2744/*_WSAENETRESET*/
_WSAECONNABORTED=@0x2745/*_WSAECONNABORTED*/
_WSAECONNRESET=@0x2746/*_WSAECONNRESET*/
_WSAENOBUFS=@0x2747/*_WSAENOBUFS*/
_WSAEISCONN=@0x2748/*_WSAEISCONN*/
_WSAENOTCONN=@0x2749/*_WSAENOTCONN*/
_WSAESHUTDOWN=@0x274A/*_WSAESHUTDOWN*/
_WSAETOOMANYREFS=@0x274B/*_WSAETOOMANYREFS*/
_WSAETIMEDOUT=@0x274C/*_WSAETIMEDOUT*/
_WSAECONNREFUSED=@0x274D/*_WSAECONNREFUSED*/
_WSAELOOP=@0x274E/*_WSAELOOP*/
_WSAENAMETOOLONG=@0x274F/*_WSAENAMETOOLONG*/
_WSAEHOSTDOWN=@0x2750/*_WSAEHOSTDOWN*/
_WSAEHOSTUNREACH=@0x2751/*_WSAEHOSTUNREACH*/
_WSAENOTEMPTY=@0x2752/*_WSAENOTEMPTY*/
_WSAEPROCLIM=@0x2753/*_WSAEPROCLIM*/
_WSAEUSERS=@0x2754/*_WSAEUSERS*/
_WSAEDQUOT=@0x2755/*_WSAEDQUOT*/
_WSAESTALE=@0x2756/*_WSAESTALE*/
_WSAEREMOTE=@0x2757/*_WSAEREMOTE*/
_WSASYSNOTREADY=@0x276B/*_WSASYSNOTREADY*/
_WSAVERNOTSUPPORTED=@0x276C/*_WSAVERNOTSUPPORTED*/
_WSANOTINITIALISED=@0x276D/*_WSANOTINITIALISED*/
_WSAHOST_NOT_FOUND=@0x2AF9/*_WSAHOST_NOT_FOUND*/
_HOST_NOT_FOUND=@0x2AF9/*_HOST_NOT_FOUND*/
_WSATRY_AGAIN=@0x2AFA/*_WSATRY_AGAIN*/
_TRY_AGAIN=@0x2AFA/*_TRY_AGAIN*/
_WSANO_RECOVERY=@0x2AFB/*_WSANO_RECOVERY*/
_NO_RECOVERY=@0x2AFB/*_NO_RECOVERY*/
_WSANO_DATA=@0x2AFC/*_WSANO_DATA*/
_NO_DATA=@0x2AFC/*_NO_DATA*/
_WSANO_ADDRESS=@0x2AFC/*_WSANO_ADDRESS*/
_NO_ADDRESS=@0x2AFC/*_NO_ADDRESS*/
_INVALID_SOCKET=topointer(-1)
_SOCK_ERROR=@-1/*_SOCK_ERROR*/
_SOCKET_ERROR=@-1/*_SOCKET_ERROR*/
_IOC_INOUT=@0xC0000000/*_IOC_INOUT*/
_SO_DONTLINGER=@0xFFFFFF7F/*_SO_DONTLINGER*/

 _WSAIOW = @_WSAIOW=function(x,y) {return (0x80000000/*_IOC_IN*/|(x)|(y)) }    
_SIO_RCVALL=@0x98000001/*_SIO_RCVALL*/
_SIO_RCVALL_MCAST=@0x98000002/*_SIO_RCVALL_MCAST*/
_SIO_RCVALL_IGMPMCAST=@0x98000003/*_SIO_RCVALL_IGMPMCAST*/
_SIO_KEEPALIVE_VALS=@0x98000004/*_SIO_KEEPALIVE_VALS*/
_SIO_ABSORB_RTRALERT=@0x98000005/*_SIO_ABSORB_RTRALERT*/
_SIO_UCAST_IF=@0x98000006/*_SIO_UCAST_IF*/
_SIO_LIMIT_BROADCASTS=@0x98000007/*_SIO_LIMIT_BROADCASTS*/
_SIO_INDEX_BIND=@0x98000008/*_SIO_INDEX_BIND*/
_SIO_INDEX_MCASTIF=@0x98000009/*_SIO_INDEX_MCASTIF*/
_SIO_INDEX_ADD_MCAST=@0x9800000A/*_SIO_INDEX_ADD_MCAST*/
_SIO_INDEX_DEL_MCAST=@0x9800000B/*_SIO_INDEX_DEL_MCAST*/
_SIO_RCVALL_MCAST_IF=@0x9800000D/*_SIO_RCVALL_MCAST_IF*/
_SIO_RCVALL_IF=@0x9800000E/*_SIO_RCVALL_IF*/ 
end intellisense**/
/*}}*/
   
 
