unified LinNet

BlackBox/_Linux_/Lin/Mod/Net.txt

@@ -1,30 +1,20 @@
 MODULE LinNet ["libc.so.6"];
 
 	(*
-		A. V. Shiryaev, 2012.11, 2016.11
-
 		GNU/Linux
-		32-bit
+		i386
 	*)
 
-	IMPORT Libc := LinLibc;
-
 	CONST
-		INVALID_SOCKET* = -1;
+		NULL* = 0H;
+
 		SOCKET_ERROR* = -1;
+		INVALID_SOCKET* = -1;
 
-		(* /usr/include/i386-linux-gnu/bits/socket.h *)
-			SHUT_RD* = 0;
-			SHUT_WR* = 1;
-			SHUT_RDWR* = 2;
-			SOCK_STREAM* = 1;
-			SOCK_DGRAM* = 2;
-			SOCK_RAW* = 3;
-			SOCK_RDM* = 4;
-			SOCK_SEQPACKET* = 5;
-			SOCK_DCCP* = 6;
-			SOCK_PACKET* = 10;
+		INADDR_NONE* = -1;
+		INADDR_ANY* = 0;
 
+		(* socket domains *)
 			PF_UNSPEC* = 0; (* Unspecified. *)
 			PF_LOCAL* = 1; (* Local to host (pipes and file-domain). *)
 			PF_UNIX* = PF_LOCAL; (* POSIX name for PF_LOCAL. *)
@@ -68,9 +58,49 @@ MODULE LinNet ["libc.so.6"];
 			PF_NFC* = 39; (* NFC sockets. *)
 			PF_VSOCK* = 40; (* vSockets. *)
 			PF_MAX* = 41; (* For now.. *)
-			SOMAXCONN* = 128;
 
-		(* /usr/include/asm-generic/socket.h *)
+		(* socket types *)
+			(* /usr/include/i386-linux-gnu/bits/socket_type.h *)
+				SOCK_STREAM* = 1;
+				SOCK_DGRAM* = 2;
+				SOCK_RAW* = 3;
+				SOCK_RDM* = 4;
+				SOCK_SEQPACKET* = 5;
+				SOCK_DCCP* = 6;
+				SOCK_PACKET* = 10;
+
+		(* socket protocols *)
+			IPPROTO_IP = 0; (* Dummy protocol for TCP. *)
+			IPPROTO_HOPOPTS* = 0; (* IPv6 Hop-by-Hop options. *)
+			IPPROTO_ICMP* = 1; (* Internet Control Message Protocol. *)
+			IPPROTO_IGMP* = 2; (* Internet Group Management Protocol. *)
+			IPPROTO_IPIP* = 4; (* IPIP tunnels (older KA9Q tunnels use 94). *)
+			IPPROTO_TCP* = 6; (* Transmission Control Protocol. *)
+			IPPROTO_EGP* = 8; (* Exterior Gateway Protocol. *)
+			IPPROTO_PUP* = 12; (* PUP protocol. *)
+			IPPROTO_UDP* = 17; (* User Datagram Protocol. *)
+			IPPROTO_IDP* = 22; (* XNS IDP protocol. *)
+			IPPROTO_TP* = 29; (* SO Transport Protocol Class 4. *)
+			IPPROTO_DCCP* = 33; (* Datagram Congestion Control Protocol. *)
+			IPPROTO_IPV6* = 41; (* IPv6 header. *)
+			IPPROTO_ROUTING* = 43; (* IPv6 routing header. *)
+			IPPROTO_FRAGMENT* = 44; (* IPv6 fragmentation header. *)
+			IPPROTO_RSVP* = 46; (* Reservation Protocol. *)
+			IPPROTO_GRE* = 47; (* General Routing Encapsulation. *)
+			IPPROTO_ESP* = 50; (* encapsulating security payload. *)
+			IPPROTO_AH* = 51; (* authentication header. *)
+			IPPROTO_ICMPV6* = 58; (* ICMPv6. *)
+			IPPROTO_NONE* = 59; (* IPv6 no next header. *)
+			IPPROTO_DSTOPTS* = 60; (* IPv6 destination options. *)
+			IPPROTO_MTP* = 92; (* Multicast Transport Protocol. *)
+			IPPROTO_ENCAP* = 98; (* Encapsulation Header. *)
+			IPPROTO_PIM* = 103; (* Protocol Independent Multicast. *)
+			IPPROTO_COMP* = 108; (* Compression Header Protocol. *)
+			IPPROTO_SCTP* = 132; (* Stream Control Transmission Protocol. *)
+			IPPROTO_UDPLITE* = 136; (* UDP-Lite protocol. *)
+			IPPROTO_RAW* = 255; (* Raw IP packets. *)
+
+		(* socket options *)
 			SO_DEBUG* = {0};
 			SO_REUSEADDR* = {1};
 			SO_TYPE* = {0,1};
@@ -113,185 +143,181 @@ MODULE LinNet ["libc.so.6"];
 			SO_BUSY_POLL* = {1..3,5};
 			SO_MAX_PACING_RATE* = {0..3,5};
 
-		(* /usr/include/netinet/in.h *)
-			INADDR_NONE* = -1;
-			INADDR_ANY* = 0;
-			IPPROTO_IP = 0; (* Dummy protocol for TCP. *)
-			IPPROTO_HOPOPTS* = 0; (* IPv6 Hop-by-Hop options. *)
-			IPPROTO_ICMP* = 1; (* Internet Control Message Protocol. *)
-			IPPROTO_IGMP* = 2; (* Internet Group Management Protocol. *)
-			IPPROTO_IPIP* = 4; (* IPIP tunnels (older KA9Q tunnels use 94). *)
-			IPPROTO_TCP* = 6; (* Transmission Control Protocol. *)
-			IPPROTO_EGP* = 8; (* Exterior Gateway Protocol. *)
-			IPPROTO_PUP* = 12; (* PUP protocol. *)
-			IPPROTO_UDP* = 17; (* User Datagram Protocol. *)
-			IPPROTO_IDP* = 22; (* XNS IDP protocol. *)
-			IPPROTO_TP* = 29; (* SO Transport Protocol Class 4. *)
-			IPPROTO_DCCP* = 33; (* Datagram Congestion Control Protocol. *)
-			IPPROTO_IPV6* = 41; (* IPv6 header. *)
-			IPPROTO_ROUTING* = 43; (* IPv6 routing header. *)
-			IPPROTO_FRAGMENT* = 44; (* IPv6 fragmentation header. *)
-			IPPROTO_RSVP* = 46; (* Reservation Protocol. *)
-			IPPROTO_GRE* = 47; (* General Routing Encapsulation. *)
-			IPPROTO_ESP* = 50; (* encapsulating security payload. *)
-			IPPROTO_AH* = 51; (* authentication header. *)
-			IPPROTO_ICMPV6* = 58; (* ICMPv6. *)
-			IPPROTO_NONE* = 59; (* IPv6 no next header. *)
-			IPPROTO_DSTOPTS* = 60; (* IPv6 destination options. *)
-			IPPROTO_MTP* = 92; (* Multicast Transport Protocol. *)
-			IPPROTO_ENCAP* = 98; (* Encapsulation Header. *)
-			IPPROTO_PIM* = 103; (* Protocol Independent Multicast. *)
-			IPPROTO_COMP* = 108; (* Compression Header Protocol. *)
-			IPPROTO_SCTP* = 132; (* Stream Control Transmission Protocol. *)
-			IPPROTO_UDPLITE* = 136; (* UDP-Lite protocol. *)
-			IPPROTO_RAW* = 255; (* Raw IP packets. *)
-
-		(* /usr/include/asm-generic/param.h *)
-			MAXHOSTNAMELEN* = 64; (* max length of hostname *)
+		(* /usr/include/i386-linux-gnu/sys/socket.h *)
+			SHUT_RD* = 0;
+			SHUT_WR* = 1;
+			SHUT_RDWR* = 2;
 
-		(* /usr/include/netdb.h *)
-(*
-			NETDB_INTERNAL* = -1; (* See errno. *)
-			NETDB_SUCCESS* = 0; (* No problem. *)
-			HOST_NOT_FOUND* = 1; (* Authoritative Answer Host not found. *)
-			TRY_AGAIN* = 2; (* Non-Authoritative Host not found, or SERVERFAIL. *)
-			NO_RECOVERY* = 3; (* Non recoverable errors, FORMERR, REFUSED, NOTIMP. *)
-			NO_DATA* = 4; (* Valid name, no data record of requested type. *)
-*)
+		SOL_SOCKET* = 1;
 
-			EAI_BADFLAGS* = -1; (* Invalid value for `ai_flags' field *)
-			EAI_NONAME* = -2; (* NAME or SERVICE is unknown *)
-			EAI_AGAIN* = -3; (* Temporary failure in name resolution *)
-			EAI_FAIL* = -4; (* Non-recoverable failure in name res *)
-			EAI_FAMILY* = -6; (* `ai_family' not supported *)
-			EAI_SOCKTYPE* = -7; (* `ai_socktype' not supported *)
-			EAI_SERVICE* = -8; (* SERVICE not supported for `ai_socktype' *)
-			EAI_MEMORY* = -10; (* Memory allocation failure *)
-			EAI_SYSTEM* = -11; (* System error returned in `errno' *)
-			EAI_OVERFLOW* = -12; (* Argument buffer overflow *)
-			EAI_NODATA* = -5; (* No address associated with NAME *)
-			EAI_ADDRFAMILY* = -9; (* Address family for NAME not supported *)
-			EAI_INPROGRESS* = -100; (* Processing request in progress *)
-			EAI_CANCELED* = -101; (* Request canceled *)
-			EAI_NOTCANCELED* = -102; (* Request not canceled *)
-			EAI_ALLDONE* = -103; (* All requests done *)
-			EAI_INTR* = -104; (* Interrupted by a signal *)
-			EAI_IDN_ENCODE* = -105; (* IDN encoding failed *)
+		(* /usr/include/i386-linux-gnu/bits/socket.h *)
+			MSG_OOB* = {0};
+			MSG_PEEK* = {1};
+			MSG_DONTROUTE* = {2};
+			MSG_CTRUNC* = {3};
+			MSG_PROXY* = {4};
+			MSG_TRUNC* = {5};
+			MSG_DONTWAIT* = {6};
+			MSG_EOR* = {7};
+			MSG_WAITALL* = {8};
+			MSG_FIN* = {9};
+			MSG_SYN* = {10};
+			MSG_CONFIRM* = {11};
+			MSG_RST* = {12};
+			MSG_ERRQUEUE* = {13};
+			MSG_NOSIGNAL* = {14};
+			MSG_MORE* = {15};
+			MSG_WAITFORONE* = {16};
+
+		(* addrinfo.ai_flags *)
+			AI_PASSIVE* = {0}; (* Socket address is intended for `bind'. *)
+			AI_CANONNAME* = {1}; (* Request for canonical name. *)
+			AI_NUMERICHOST* = {2}; (* Don't use name resolution. *)
+			AI_V4MAPPED* = {3}; (* IPv4 mapped addresses are acceptable. *)
+			AI_ALL* = {4}; (* Return IPv4 mapped and IPv6 addresses. *)
+			AI_CANONIDN* = {7}; (* Translate canonical name from IDN format. *)
+			AI_NUMERICSERV* = {10}; (* Don't use name resolution. *)
+
+		(* getaddrinfo/getnameinfo/gai_strerror error codes *)
+			EAI_BADFLAGS* = -1; (* Invalid value for `ai_flags' field. *)
+			EAI_NONAME* = -2; (* NAME or SERVICE is unknown. *)
+			EAI_AGAIN* = -3; (* Temporary failure in name resolution. *)
+			EAI_FAIL* = -4; (* Non-recoverable failure in name res. *)
+			EAI_FAMILY* = -6; (* `ai_family' not supported. *)
+			EAI_SOCKTYPE* = -7; (* `ai_socktype' not supported. *)
+			EAI_SERVICE* = -8; (* SERVICE not supported for `ai_socktype'. *)
+			EAI_MEMORY* = -10; (* Memory allocation failure. *)
+			EAI_SYSTEM* = -11; (* System error returned in `errno'. *)
+			EAI_OVERFLOW* = -12; (* Argument buffer overflow. *)
+			EAI_NODATA* = -5; (* No address associated with NAME. *)
+			EAI_ADDRFAMILY* = -9; (* Address family for NAME not supported. *)
+			EAI_INPROGRESS* = -100; (* Processing request in progress. *)
+			EAI_CANCELED* = -101; (* Request canceled. *)
+			EAI_NOTCANCELED* = -102; (* Request not canceled. *)
+			EAI_ALLDONE* = -103; (* All requests done. *)
+			EAI_INTR* = -104; (* Interrupted by a signal. *)
+			EAI_IDN_ENCODE* = -105; (* IDN encoding failed. *)
 
 		(* /usr/include/i386-linux-gnu/bits/typesizes.h *)
 			__FD_SETSIZE = 1024;
 
 	TYPE
+		u_int8_t = SHORTCHAR;
+		int8_t = SHORTCHAR;
+		uint16_t = SHORTINT;
+		(* PtrVoid, int, intFlags, short, socklen_t, size_t, ssize_t, in_addr_t, in_port_t, time_t, suseconds_t, nfds_t, sa_family_t *)
+		PtrVoid* = INTEGER;
+		short* = SHORTINT;
 		int* = INTEGER;
+		intFlags* = SET;
+		size_t* = INTEGER;
+		ssize_t* = INTEGER;
+		time_t* = INTEGER;
+		suseconds_t* = INTEGER;
+		socklen_t* = INTEGER;
+		in_addr_t* = INTEGER;
+		in_port_t* = SHORTINT;
+		nfds_t* = INTEGER;
+		sa_family_t* = SHORTINT;
+
+		PtrSTR* = POINTER [untagged] TO ARRAY [untagged] OF SHORTCHAR;
 
 		SOCKET* = int;
 
-		(* /usr/include/i386-linux-gnu/bits/types.h *)
-			socklen_t* = INTEGER;
-		(* /usr/include/i386-linux-gnu/bits/sockaddr.h *)
-			sa_family_t* = SHORTINT; (* unsigned short int *)
-		(* /usr/include/netinet/in.h *)
-			in_addr_t* = INTEGER;
-			in_port_t* = SHORTINT;
-
-		(* /usr/include/i386-linux-gnu/bits/socket.h *)
-			Ptrsockaddr* = POINTER [untagged] TO sockaddr;
-			sockaddr* = RECORD [untagged]
-				sa_family: sa_family_t;
-				sa_data: ARRAY [untagged] 14 OF SHORTCHAR;
-			END;
-
-		(* /usr/include/linux/in.h *)
 (*
-			in_addr* = INTEGER;
+		in_addr* = RECORD [untagged]
+			s_addr*: in_addr_t;
+		END;
 *)
-			in_addr* = RECORD [untagged]
-				S_un*: RECORD [union]
-					S_un_b*: RECORD [untagged]
-						s_b1*: SHORTCHAR;
-						s_b2*: SHORTCHAR;
-						s_b3*: SHORTCHAR;
-						s_b4*: SHORTCHAR;
-					END;
-					S_un_w*: RECORD [untagged]
-						s_w1*: SHORTINT;
-						s_w2*: SHORTINT;
-					END;
-					S_addr*: in_addr_t;
+		in_addr* = RECORD [untagged]
+			S_un*: RECORD [union]
+				S_un_b*: RECORD [untagged]
+					s_b1*: SHORTCHAR;
+					s_b2*: SHORTCHAR;
+					s_b3*: SHORTCHAR;
+					s_b4*: SHORTCHAR;
+				END;
+				S_un_w*: RECORD [untagged]
+					s_w1*: SHORTINT;
+					s_w2*: SHORTINT;
 				END;
+				S_addr*: in_addr_t;
 			END;
+		END;
+
+		Ptrsockaddr* = POINTER [untagged] TO sockaddr;
+		sockaddr* = RECORD [untagged]
+			(* /usr/include/i386-linux-gnu/bits/socket.h *)
+				sa_family: sa_family_t;
+				sa_data: ARRAY [untagged] 14 OF SHORTCHAR;
+		END;
+
+		Ptrsockaddr_storage = POINTER [untagged] TO sockaddr_storage;
+		sockaddr_storage* = RECORD [untagged]
+			(* /usr/include/i386-linux-gnu/bits/socket.h *)
+				sa_family: sa_family_t;
+				__ss_align: INTEGER;
+				__ss_padding: ARRAY [untagged] 128 - 2 * 4 OF SHORTCHAR;
+		END;
 
-		(* /usr/include/linux/in.h *)
-			Ptrsockaddr_in* = POINTER [untagged] TO sockaddr_in;
-			sockaddr_in* = RECORD [untagged]
+		Ptrsockaddr_in* = POINTER [untagged] TO sockaddr_in;
+		sockaddr_in* = RECORD [untagged]
+			(* /usr/include/linux/in.h *)
 				sin_family*: sa_family_t; (* address family *)
 				sin_port*: SHORTINT; (* port number *)
 				sin_addr*: in_addr; (* internet address *)
 				__pad: ARRAY [untagged] 8 OF SHORTCHAR;
-			END;
-
-		(* /usr/include/netdb.h *)
-(* deprecated
-			Ptrhostent* = POINTER [untagged] TO hostent;
-			hostent* = RECORD [untagged]
-				h_name*: Libc.PtrSTR; (* official name of host *)
-				h_aliases*: POINTER [untagged] TO ARRAY [untagged] OF Libc.PtrSTR; (* alias list *)
-				h_addrtype*: INTEGER; (* host address type *)
-				h_length*: INTEGER; (* length of address *)
-				h_addr_list*: POINTER [untagged] TO ARRAY [untagged] OF POINTER [untagged] TO ARRAY [untagged] OF in_addr; (* list of addresses from name server *)
-			END;
-*)
+		END;
 
-			Ptraddrinfo* = POINTER [untagged] TO addrinfo;
-			addrinfo* = RECORD [untagged]
-				ai_flags*: SET; (* input flags *)
+		Ptraddrinfo* = POINTER [untagged] TO addrinfo;
+		addrinfo* = RECORD [untagged]
+			(* Linux, FreeBSD, OpenBSD *)
+				ai_flags*: intFlags; (* input flags *)
 				ai_family*: int; (* protocol family for socket *)
 				ai_socktype*: int; (* socket type *)
 				ai_protocol*: int; (* protocol for socket *)
 				ai_addrlen*: socklen_t; (* length of socket-address *)
 				ai_addr*: Ptrsockaddr; (* socket-address for socket *)
-				ai_canonname*: Libc.PtrSTR; (* canonical name for service location (iff req) *)
+				ai_canonname*: PtrSTR; (* canonical name for service location (iff req) *)
 				ai_next*: Ptraddrinfo; (* pointer to next in list *)
-			END;
+		END;
 
-		(* /usr/include/linux/time.h *)
-		(* /usr/include/asm-generic/posix_types.h *)
-			timeval* = RECORD [untagged]
-				tv_sec*: INTEGER; (* seconds *)
-				tv_usec*: INTEGER; (* microseconds *)
-			END;
+		timeval* = RECORD [untagged]
+			(* Linux, FreeBSD, OpenBSD *)
+				tv_sec*: time_t; (* seconds *)
+				tv_usec*: suseconds_t; (* and microseconds *)
+		END;
+
+		pollfd* = RECORD [untagged]
+			(* Linux, FreeBSD, OpenBSD *)
+				fd*: int;
+				events*: short;
+				revents*: short;
+		END;
 
 		(* /usr/include/i386-linux-gnu/sys/select.h *)
 			__fd_mask = SET;
 			fd_set* = ARRAY [untagged] __FD_SETSIZE DIV (SIZE(__fd_mask) * 8) OF __fd_mask;
 
-(* deprecated
-	PROCEDURE [ccall] __h_errno_location* (): INTEGER;
-*)
+	(* POSIX.1 *)
+		PROCEDURE [ccall] socket* (domain: int; type: int; protocol: int): SOCKET;
+		PROCEDURE [ccall] accept* (s: SOCKET; VAR addr: sockaddr; VAR addrlen: socklen_t): SOCKET;
+		PROCEDURE [ccall] bind* (s: SOCKET; VAR name: sockaddr; namelen: socklen_t): int;
+		PROCEDURE [ccall] connect* (s: SOCKET; VAR name: sockaddr; namelen: socklen_t): int;
+		PROCEDURE [ccall] getsockname* (s: SOCKET; VAR name: sockaddr; VAR namelen: socklen_t): int;
+		PROCEDURE [ccall] listen* (s: SOCKET; backlog: int): int;
+		PROCEDURE [ccall] recv* (s: SOCKET; buf: PtrVoid; len: size_t; flags: intFlags): ssize_t;
+		PROCEDURE [ccall] send* (s: SOCKET; msg: PtrVoid; len: size_t; flags: intFlags): ssize_t;
+		PROCEDURE [ccall] shutdown* (s: SOCKET; how: int): int;
+		PROCEDURE [ccall] getsockopt* (s: SOCKET; level: int; optname: intFlags; optval: PtrVoid; VAR [nil] optlen: socklen_t): int;
+		PROCEDURE [ccall] setsockopt* (s: SOCKET; level: int; optname: intFlags; optval: PtrVoid; optlen: socklen_t): int;
 
-	PROCEDURE [ccall] socket* (domain: INTEGER; type: INTEGER; protocol: INTEGER): SOCKET;
-	PROCEDURE [ccall] accept* (sockfd: SOCKET; VAR addr: sockaddr; VAR addrlen: socklen_t): SOCKET;
-	PROCEDURE [ccall] bind* (sockfd: SOCKET; VAR addr: sockaddr; addrlen: socklen_t): INTEGER;
-	PROCEDURE [ccall] connect* (sockfd: SOCKET; VAR addr: sockaddr; addrlen: socklen_t): INTEGER;
-	PROCEDURE [ccall] listen* (sockfd: SOCKET; backlog: INTEGER): INTEGER;
-	PROCEDURE [ccall] recv* (soskfd: SOCKET; buf: Libc.PtrVoid; len: Libc.size_t; flags: SET): Libc.ssize_t;
-	PROCEDURE [ccall] send* (sockfd: SOCKET; buf: Libc.PtrVoid; len: Libc.size_t; flags: SET): Libc.ssize_t;
-	PROCEDURE [ccall] shutdown* (sockfd: SOCKET; how: INTEGER): INTEGER;
-	PROCEDURE [ccall] getsockopt* (sockfd: SOCKET; level: INTEGER; optname: SET; optval: Libc.PtrVoid; VAR optlen: socklen_t): INTEGER;
-	PROCEDURE [ccall] setsockopt* (sockfd: SOCKET; level: INTEGER; optname: SET; optval: Libc.PtrVoid; optlen: socklen_t): INTEGER;
-
-	PROCEDURE [ccall] htons* (hostshort: SHORTINT): SHORTINT;
-
-(* deprecated
-	PROCEDURE [ccall] gethostbyname* (name: Libc.PtrSTR): Ptrhostent;
-*)
-	PROCEDURE [ccall] inet_addr* (cp: Libc.PtrSTR): in_addr_t;
+		PROCEDURE [ccall] inet_addr* (cp: PtrSTR): in_addr_t;
+		PROCEDURE [ccall] htons* (host16: uint16_t): uint16_t;
 
-	PROCEDURE [ccall] getsockname* (sockfd: SOCKET; VAR addr: sockaddr; VAR addrlen: socklen_t): INTEGER;
+		PROCEDURE [ccall] select* (nfds: INTEGER; VAR [nil] readfds: fd_set; VAR [nil] writefds: fd_set; VAR [nil] exceptfds: fd_set; VAR timeout: timeval): int;
 
-(* deprecated
-	PROCEDURE [ccall] hstrerror* (err: INTEGER): Libc.PtrSTR;
-*)
+		PROCEDURE [ccall] poll* (VAR fds: ARRAY [untagged] OF pollfd; nfds: nfds_t; timeout: int): int;
 
 (*
 	PROCEDURE FD_ZERO (VAR set: Net.fd_set);
@@ -306,11 +332,10 @@ MODULE LinNet ["libc.so.6"];
 	END FD_SET;
 *)
 
-	PROCEDURE [ccall] select* (nfds: INTEGER; VAR [nil] readfds: fd_set; VAR [nil] writefds: fd_set; VAR [nil] exceptfds: fd_set; VAR timeout: timeval): INTEGER;
-
-	PROCEDURE [ccall] getaddrinfo* (hostname, servname: Libc.PtrSTR; VAR [nil] hints: addrinfo; VAR res: Ptraddrinfo): int;
-	PROCEDURE [ccall] freeaddrinfo* (ai: Ptraddrinfo);
+	(* POSIX.1g *)
+		PROCEDURE [ccall] getaddrinfo* (hostname: PtrSTR; servname: PtrSTR; VAR [nil] hints: addrinfo; VAR res: Ptraddrinfo): int;
+		PROCEDURE [ccall] freeaddrinfo* (ai: Ptraddrinfo);
 
-	PROCEDURE [ccall] gai_strerror* (ecode: int): Libc.PtrSTR;
+		PROCEDURE [ccall] gai_strerror* (ecode: int): PtrSTR;
 
-END LinNet.
+END LinNet.

BlackBox/_Linux_/Lin/Mod/gen-Net/defs-msg

@@ -1,18 +1,18 @@
-				(* /usr/include/i386-linux-gnu/bits/socket.h *)
-					MSG_OOB* = {0};
-					MSG_PEEK* = {1};
-					MSG_DONTROUTE* = {2};
-					MSG_CTRUNC* = {3};
-					MSG_PROXY* = {4};
-					MSG_TRUNC* = {5};
-					MSG_DONTWAIT* = {6};
-					MSG_EOR* = {7};
-					MSG_WAITALL* = {8};
-					MSG_FIN* = {9};
-					MSG_SYN* = {10};
-					MSG_CONFIRM* = {11};
-					MSG_RST* = {12};
-					MSG_ERRQUEUE* = {13};
-					MSG_NOSIGNAL* = {14};
-					MSG_MORE* = {15};
-					MSG_WAITFORONE* = {16};
+		(* /usr/include/i386-linux-gnu/bits/socket.h *)
+			MSG_OOB* = {0};
+			MSG_PEEK* = {1};
+			MSG_DONTROUTE* = {2};
+			MSG_CTRUNC* = {3};
+			MSG_PROXY* = {4};
+			MSG_TRUNC* = {5};
+			MSG_DONTWAIT* = {6};
+			MSG_EOR* = {7};
+			MSG_WAITALL* = {8};
+			MSG_FIN* = {9};
+			MSG_SYN* = {10};
+			MSG_CONFIRM* = {11};
+			MSG_RST* = {12};
+			MSG_ERRQUEUE* = {13};
+			MSG_NOSIGNAL* = {14};
+			MSG_MORE* = {15};
+			MSG_WAITFORONE* = {16};

BlackBox/_Linux_/Lin/Mod/gen-Net/osname

@@ -1 +1 @@
-Linux
+GNU/Linux