''
''
'' tcp -- header translated with help of SWIG FB wrapper
''
'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
''         be included in other distributions without authorization.
''
''
#ifndef __tcp_bi__
#define __tcp_bi__

#define WTCP_VER &h0102

type byte as ubyte
type word as uinteger
type longword as uinteger

type tcp_Socket
	undoc(0 to 4300-1) as byte
end type

type udp_Socket
	undoc(0 to 2200-1) as byte
end type

type sockaddr
	s_type as word
	s_port as word
	s_ip as longword
	s_spares(0 to 6-1) as byte
end type

type in_addr
	s_addr as longword
end type

#define MAX_COOKIES 10
#define MAX_NAMESERVERS 10
#define TCP_MODE_BINARY 0
#define TCP_MODE_ASCII 1
#define UDP_MODE_CHK 0
#define UDP_MODE_NOCHK 2
#define TCP_MODE_NAGLE 0
#define TCP_MODE_NONAGLE 4

declare function sock_init cdecl alias "sock_init" () as integer
declare function sock_read cdecl alias "sock_read" (byval s as any ptr, byval dp as byte ptr, byval len as integer) as integer
declare function sock_fastread cdecl alias "sock_fastread" (byval s as any ptr, byval dp as byte ptr, byval len as integer) as integer
declare function sock_write cdecl alias "sock_write" (byval s as any ptr, byval dp as byte ptr, byval len as integer) as integer
declare sub sock_enqueue cdecl alias "sock_enqueue" (byval s as any ptr, byval dp as byte ptr, byval len as integer)
declare function sock_fastwrite cdecl alias "sock_fastwrite" (byval s as any ptr, byval dp as byte ptr, byval len as integer) as integer
declare function sock_flush cdecl alias "sock_flush" (byval s as any ptr) as integer
declare function sock_flushnext cdecl alias "sock_flushnext" (byval s as any ptr) as integer
declare function sock_puts cdecl alias "sock_puts" (byval s as any ptr, byval dp as byte ptr) as integer
declare function sock_gets cdecl alias "sock_gets" (byval s as any ptr, byval dp as byte ptr, byval n as integer) as word
declare function sock_putc cdecl alias "sock_putc" (byval s as any ptr, byval c as byte) as byte
declare function sock_getc cdecl alias "sock_getc" (byval s as any ptr) as byte
declare function sock_dataready cdecl alias "sock_dataready" (byval s as any ptr) as word
declare function sock_close cdecl alias "sock_close" (byval s as any ptr) as integer
declare function sock_abort cdecl alias "sock_abort" (byval s as any ptr) as integer
declare function sock_printf cdecl alias "sock_printf" (byval s as any ptr, byval format as zstring ptr, ...) as integer
declare function sock_scanf cdecl alias "sock_scanf" (byval s as any ptr, byval format as zstring ptr, ...) as integer
declare function sock_mode cdecl alias "sock_mode" (byval s as any ptr, byval mode as word) as integer
declare sub db_write cdecl alias "db_write" (byval msg as zstring ptr)
declare sub dbug_init cdecl alias "dbug_init" ()
declare sub dbug_printf cdecl alias "dbug_printf" (byval as zstring ptr, ...)
declare function udp_open cdecl alias "udp_open" (byval s as any ptr, byval lport as word, byval ina as longword, byval port as word, byval datahandler as function cdecl(byval as ) as integer) as integer
declare function tcp_open cdecl alias "tcp_open" (byval s as any ptr, byval lport as word, byval ina as longword, byval port as word, byval datahandler as function cdecl(byval as ) as integer) as integer
declare function tcp_listen cdecl alias "tcp_listen" (byval s as any ptr, byval lport as word, byval ina as longword, byval port as word, byval datahandler as function cdecl(byval as ) as integer, byval timeout as word) as integer
declare function tcp_established cdecl alias "tcp_established" (byval s as any ptr) as integer
declare function rip cdecl alias "rip" (byval s as zstring ptr) as zstring ptr
declare function resolve cdecl alias "resolve" (byval name as zstring ptr) as longword
declare function reverse_addr_lookup cdecl alias "reverse_addr_lookup" (byval ipaddr as longword, byval name as zstring ptr) as integer
declare function aton cdecl alias "aton" (byval text as zstring ptr) as longword
declare function isaddr cdecl alias "isaddr" (byval text as zstring ptr) as integer
declare function tcp_cbreak cdecl alias "tcp_cbreak" (byval mode as word) as integer
declare function intel cdecl alias "intel" (byval x as longword) as longword
declare function intel16 cdecl alias "intel16" (byval x as word) as word
declare sub ip_timer_init cdecl alias "ip_timer_init" (byval s as any ptr, byval delayseconds as word)
declare function ip_timer_expired cdecl alias "ip_timer_expired" (byval s as any ptr) as word
extern my_ip_addr alias "my_ip_addr" as longword
extern sin_mask alias "sin_mask" as longword
extern sock_delay alias "sock_delay" as word
declare function tcp_shutdown cdecl alias "tcp_shutdown" () as integer
declare function tcp_Init cdecl alias "tcp_Init" () as integer
declare function sock_debugdump cdecl alias "sock_debugdump" (byval s as any ptr) as integer
declare function tcp_config cdecl alias "tcp_config" (byval path as zstring ptr) as integer
declare function tcp_tick cdecl alias "tcp_tick" (byval s as any ptr) as integer
declare function tcp_Retransmitter cdecl alias "tcp_Retransmitter" () as integer
declare function tcp_set_debug_state cdecl alias "tcp_set_debug_state" (byval x as word) as integer
extern _last_cookie alias "_last_cookie" as integer
extern _cookie(0 to 10-1) alias "_cookie" as longword
extern def_domain alias "def_domain" as zstring ptr
extern def_nameservers(0 to 10-1) alias "def_nameservers" as longword
extern wathndlcbrk alias "wathndlcbrk" as word
extern watcbroke alias "watcbroke" as word
declare function _ip_delay0 cdecl alias "_ip_delay0" (byval s as any ptr, byval seconds as integer, byval fn as function cdecl(byval as ) as integer, byval statusptr as any ptr) as integer
declare function _ip_delay1 cdecl alias "_ip_delay1" (byval s as any ptr, byval seconds as integer, byval fn as function cdecl(byval as ) as integer, byval statusptr as any ptr) as integer
declare function _ip_delay2 cdecl alias "_ip_delay2" (byval s as any ptr, byval seconds as integer, byval fn as function cdecl(byval as ) as integer, byval statusptr as any ptr) as integer
declare function set_timeout cdecl alias "set_timeout" (byval seconds as uinteger) as uinteger
declare function set_ttimeout cdecl alias "set_ttimeout" (byval ticks as uinteger) as uinteger
declare function chk_timeout cdecl alias "chk_timeout" (byval timeout as uinteger) as integer
declare function tcp_tick cdecl alias "tcp_tick" (byval s as any ptr) as integer
extern usr_init alias "usr_init" as sub cdecl(byval as )
declare function aton cdecl alias "aton" (byval string as zstring ptr) as longword
declare function _send_ping cdecl alias "_send_ping" (byval host as longword, byval countnum as longword, byval ttl as byte, byval tos as byte, byval theid as longword ptr) as integer
declare function _chk_ping cdecl alias "_chk_ping" (byval host as longword, byval ptr as longword ptr) as longword
declare sub _arp_register cdecl alias "_arp_register" (byval use as longword, byval instead_of as longword)
declare sub _eth_init cdecl alias "_eth_init" ()
declare function _eth_formatpacket cdecl alias "_eth_formatpacket" (byval eth_dest as any ptr, byval eth_type as word) as byte ptr
declare sub _eth_send cdecl alias "_eth_send" (byval len as word)
declare sub _eth_free cdecl alias "_eth_free" (byval buf as any ptr)
declare function _eth_arrived cdecl alias "_eth_arrived" (byval type_ptr as word ptr) as byte ptr
declare sub _eth_release cdecl alias "_eth_release" ()
declare function sock_rbsize cdecl alias "sock_rbsize" (byval s as any ptr) as integer
declare function sock_rbused cdecl alias "sock_rbused" (byval s as any ptr) as integer
declare function sock_rbleft cdecl alias "sock_rbleft" (byval s as any ptr) as integer
declare function sock_tbsize cdecl alias "sock_tbsize" (byval s as any ptr) as integer
declare function sock_tbused cdecl alias "sock_tbused" (byval s as any ptr) as integer
declare function sock_tbleft cdecl alias "sock_tbleft" (byval s as any ptr) as integer
declare function _chk_socket cdecl alias "_chk_socket" (byval s as tcp_Socket ptr) as integer
declare function inet_ntoa cdecl alias "inet_ntoa" (byval s as zstring ptr, byval x as longword) as zstring ptr
declare function psocket cdecl alias "psocket" (byval s as tcp_Socket ptr) as zstring ptr
declare function inet_addr cdecl alias "inet_addr" (byval s as zstring ptr) as longword
declare function sockerr cdecl alias "sockerr" (byval s as tcp_Socket ptr) as zstring ptr
declare function sockstate cdecl alias "sockstate" (byval s as tcp_Socket ptr) as zstring ptr
declare function getpeername cdecl alias "getpeername" (byval s as tcp_Socket ptr, byval dest as any ptr, byval len as integer ptr) as integer
declare function getsockname cdecl alias "getsockname" (byval s as tcp_Socket ptr, byval dest as any ptr, byval len as integer ptr) as integer
declare function gethostid cdecl alias "gethostid" () as longword
declare function sethostid cdecl alias "sethostid" (byval ip as longword) as longword
declare function getdomainname cdecl alias "getdomainname" (byval name as zstring ptr, byval length as integer) as zstring ptr
declare function setdomainname cdecl alias "setdomainname" (byval string as zstring ptr) as zstring ptr
declare function gethostname cdecl alias "gethostname" (byval name as zstring ptr, byval length as integer) as zstring ptr
declare function sethostname cdecl alias "sethostname" (byval string as zstring ptr) as zstring ptr
declare function ntohs cdecl alias "ntohs" (byval a as word) as word
declare function htons cdecl alias "htons" (byval a as word) as word
declare function ntohl cdecl alias "ntohl" (byval x as longword) as longword
declare function htonl cdecl alias "htonl" (byval x as longword) as longword
declare sub _arp_register cdecl alias "_arp_register" (byval use as longword, byval instead_of as longword)
declare function _arp_resolve cdecl alias "_arp_resolve" (byval ina as longword, byval ethap as any ptr, byval nowait as integer) as integer
declare function sock_established cdecl alias "sock_established" (byval s as tcp_Socket ptr) as integer
declare function sock_stats cdecl alias "sock_stats" (byval s as tcp_Socket ptr, byval days as word ptr, byval inactive as word ptr, byval cwindow as word ptr, byval avg as word ptr, byval sd as word ptr) as integer
declare function addwattcpd cdecl alias "addwattcpd" (byval p as sub cdecl(byval as )) as integer
declare function delwattcpd cdecl alias "delwattcpd" (byval p as sub cdecl(byval as )) as integer
declare function tap_add cdecl alias "tap_add" (byval socket as any ptr, byval userid as any ptr) as integer

#endif