414 lines
10 KiB
V
414 lines
10 KiB
V
module net
|
||
|
||
import time
|
||
|
||
const (
|
||
tcp_default_read_timeout = 30 * time.second
|
||
tcp_default_write_timeout = 30 * time.second
|
||
)
|
||
|
||
[heap]
|
||
pub struct TcpConn {
|
||
pub mut:
|
||
sock TcpSocket
|
||
mut:
|
||
write_deadline time.Time
|
||
read_deadline time.Time
|
||
read_timeout time.Duration
|
||
write_timeout time.Duration
|
||
is_blocking bool
|
||
}
|
||
|
||
pub fn dial_tcp(address string) ?&TcpConn {
|
||
addrs := resolve_addrs_fuzzy(address, .tcp) or {
|
||
return error('$err.msg(); could not resolve address $address in dial_tcp')
|
||
}
|
||
|
||
// Very simple dialer
|
||
for addr in addrs {
|
||
mut s := new_tcp_socket(addr.family()) or {
|
||
return error('$err.msg(); could not create new tcp socket in dial_tcp')
|
||
}
|
||
s.connect(addr) or {
|
||
// Connection failed
|
||
s.close() or { continue }
|
||
continue
|
||
}
|
||
|
||
return &TcpConn{
|
||
sock: s
|
||
read_timeout: net.tcp_default_read_timeout
|
||
write_timeout: net.tcp_default_write_timeout
|
||
}
|
||
}
|
||
// failed
|
||
return error('dial_tcp failed for address $address')
|
||
}
|
||
|
||
pub fn (mut c TcpConn) close() ? {
|
||
$if trace_tcp ? {
|
||
eprintln(' TcpConn.close | c.sock.handle: ${c.sock.handle:6}')
|
||
}
|
||
c.sock.close() ?
|
||
}
|
||
|
||
pub fn (c TcpConn) read_ptr(buf_ptr &byte, len int) ?int {
|
||
mut res := wrap_read_result(C.recv(c.sock.handle, voidptr(buf_ptr), len, 0)) ?
|
||
$if trace_tcp ? {
|
||
eprintln('<<< TcpConn.read_ptr | c.sock.handle: $c.sock.handle | buf_ptr: ${ptr_str(buf_ptr)} len: $len | res: $res')
|
||
}
|
||
if res > 0 {
|
||
$if trace_tcp_data_read ? {
|
||
eprintln('<<< TcpConn.read_ptr | 1 data.len: ${res:6} | data: ' +
|
||
unsafe { buf_ptr.vstring_with_len(res) })
|
||
}
|
||
return res
|
||
}
|
||
code := error_code()
|
||
if code == int(error_ewouldblock) {
|
||
c.wait_for_read() ?
|
||
res = wrap_read_result(C.recv(c.sock.handle, voidptr(buf_ptr), len, 0)) ?
|
||
$if trace_tcp ? {
|
||
eprintln('<<< TcpConn.read_ptr | c.sock.handle: $c.sock.handle | buf_ptr: ${ptr_str(buf_ptr)} len: $len | res: $res')
|
||
}
|
||
$if trace_tcp_data_read ? {
|
||
if res > 0 {
|
||
eprintln('<<< TcpConn.read_ptr | 2 data.len: ${res:6} | data: ' +
|
||
unsafe { buf_ptr.vstring_with_len(res) })
|
||
}
|
||
}
|
||
return socket_error(res)
|
||
} else {
|
||
wrap_error(code) ?
|
||
}
|
||
return none
|
||
}
|
||
|
||
pub fn (c TcpConn) read(mut buf []byte) ?int {
|
||
return c.read_ptr(buf.data, buf.len)
|
||
}
|
||
|
||
pub fn (mut c TcpConn) read_deadline() ?time.Time {
|
||
if c.read_deadline.unix == 0 {
|
||
return c.read_deadline
|
||
}
|
||
return none
|
||
}
|
||
|
||
// write_ptr blocks and attempts to write all data
|
||
pub fn (mut c TcpConn) write_ptr(b &byte, len int) ?int {
|
||
$if trace_tcp ? {
|
||
eprintln(
|
||
'>>> TcpConn.write_ptr | c.sock.handle: $c.sock.handle | b: ${ptr_str(b)} len: $len |\n' +
|
||
unsafe { b.vstring_with_len(len) })
|
||
}
|
||
$if trace_tcp_data_write ? {
|
||
eprintln('>>> TcpConn.write_ptr | data.len: ${len:6} | data: ' +
|
||
unsafe { b.vstring_with_len(len) })
|
||
}
|
||
unsafe {
|
||
mut ptr_base := &u8(b)
|
||
mut total_sent := 0
|
||
for total_sent < len {
|
||
ptr := ptr_base + total_sent
|
||
remaining := len - total_sent
|
||
mut sent := C.send(c.sock.handle, ptr, remaining, msg_nosignal)
|
||
$if trace_tcp_data_write ? {
|
||
eprintln('>>> TcpConn.write_ptr | data chunk, total_sent: ${total_sent:6}, chunk_size: ${chunk_size:6}, sent: ${sent:6}, ptr: ${ptr_str(ptr)}')
|
||
}
|
||
if sent < 0 {
|
||
code := error_code()
|
||
if code == int(error_ewouldblock) {
|
||
c.wait_for_write() ?
|
||
continue
|
||
} else {
|
||
wrap_error(code) ?
|
||
}
|
||
}
|
||
total_sent += sent
|
||
}
|
||
return total_sent
|
||
}
|
||
}
|
||
|
||
// write blocks and attempts to write all data
|
||
pub fn (mut c TcpConn) write(bytes []byte) ?int {
|
||
return c.write_ptr(bytes.data, bytes.len)
|
||
}
|
||
|
||
// write_string blocks and attempts to write all data
|
||
pub fn (mut c TcpConn) write_string(s string) ?int {
|
||
return c.write_ptr(s.str, s.len)
|
||
}
|
||
|
||
pub fn (mut c TcpConn) set_read_deadline(deadline time.Time) {
|
||
c.read_deadline = deadline
|
||
}
|
||
|
||
pub fn (mut c TcpConn) write_deadline() ?time.Time {
|
||
if c.write_deadline.unix == 0 {
|
||
return c.write_deadline
|
||
}
|
||
return none
|
||
}
|
||
|
||
pub fn (mut c TcpConn) set_write_deadline(deadline time.Time) {
|
||
c.write_deadline = deadline
|
||
}
|
||
|
||
pub fn (c &TcpConn) read_timeout() time.Duration {
|
||
return c.read_timeout
|
||
}
|
||
|
||
pub fn (mut c TcpConn) set_read_timeout(t time.Duration) {
|
||
c.read_timeout = t
|
||
}
|
||
|
||
pub fn (c &TcpConn) write_timeout() time.Duration {
|
||
return c.write_timeout
|
||
}
|
||
|
||
pub fn (mut c TcpConn) set_write_timeout(t time.Duration) {
|
||
c.write_timeout = t
|
||
}
|
||
|
||
[inline]
|
||
pub fn (c TcpConn) wait_for_read() ? {
|
||
return wait_for_read(c.sock.handle, c.read_deadline, c.read_timeout)
|
||
}
|
||
|
||
[inline]
|
||
pub fn (mut c TcpConn) wait_for_write() ? {
|
||
return wait_for_write(c.sock.handle, c.write_deadline, c.write_timeout)
|
||
}
|
||
|
||
pub fn (c &TcpConn) peer_addr() ?Addr {
|
||
mut addr := Addr{
|
||
addr: AddrData{
|
||
Ip6: Ip6{}
|
||
}
|
||
}
|
||
mut size := sizeof(Addr)
|
||
socket_error_message(C.getpeername(c.sock.handle, voidptr(&addr), &size), 'peer_addr failed') ?
|
||
return addr
|
||
}
|
||
|
||
pub fn (c &TcpConn) peer_ip() ?string {
|
||
return c.peer_addr() ?.str()
|
||
}
|
||
|
||
pub fn (c &TcpConn) addr() ?Addr {
|
||
return c.sock.address()
|
||
}
|
||
|
||
pub fn (c TcpConn) str() string {
|
||
s := c.sock.str().replace('\n', ' ').replace(' ', ' ')
|
||
return 'TcpConn{ write_deadline: $c.write_deadline, read_deadline: $c.read_deadline, read_timeout: $c.read_timeout, write_timeout: $c.write_timeout, sock: $s }'
|
||
}
|
||
|
||
pub struct TcpListener {
|
||
pub mut:
|
||
sock TcpSocket
|
||
mut:
|
||
accept_timeout time.Duration
|
||
accept_deadline time.Time
|
||
}
|
||
|
||
pub fn listen_tcp(family AddrFamily, saddr string) ?&TcpListener {
|
||
s := new_tcp_socket(family) or { return error('$err.msg(); could not create new socket') }
|
||
|
||
addrs := resolve_addrs(saddr, family, .tcp) or {
|
||
return error('$err.msg(); could not resolve address $saddr')
|
||
}
|
||
|
||
// TODO(logic to pick here)
|
||
addr := addrs[0]
|
||
|
||
// cast to the correct type
|
||
alen := addr.len()
|
||
socket_error_message(C.bind(s.handle, voidptr(&addr), alen), 'binding to $saddr failed') ?
|
||
socket_error_message(C.listen(s.handle, 128), 'listening on $saddr failed') ?
|
||
return &TcpListener{
|
||
sock: s
|
||
accept_deadline: no_deadline
|
||
accept_timeout: infinite_timeout
|
||
}
|
||
}
|
||
|
||
pub fn (mut l TcpListener) accept() ?&TcpConn {
|
||
$if trace_tcp ? {
|
||
eprintln(' TcpListener.accept | l.sock.handle: ${l.sock.handle:6}')
|
||
}
|
||
mut new_handle := C.accept(l.sock.handle, 0, 0)
|
||
if new_handle <= 0 {
|
||
l.wait_for_accept() ?
|
||
new_handle = C.accept(l.sock.handle, 0, 0)
|
||
if new_handle == -1 || new_handle == 0 {
|
||
return error('accept failed')
|
||
}
|
||
}
|
||
new_sock := tcp_socket_from_handle(new_handle) ?
|
||
$if trace_tcp ? {
|
||
eprintln(' TcpListener.accept | << new_sock.handle: ${new_sock.handle:6}')
|
||
}
|
||
return &TcpConn{
|
||
sock: new_sock
|
||
read_timeout: net.tcp_default_read_timeout
|
||
write_timeout: net.tcp_default_write_timeout
|
||
}
|
||
}
|
||
|
||
pub fn (c &TcpListener) accept_deadline() ?time.Time {
|
||
if c.accept_deadline.unix != 0 {
|
||
return c.accept_deadline
|
||
}
|
||
return error('invalid deadline')
|
||
}
|
||
|
||
pub fn (mut c TcpListener) set_accept_deadline(deadline time.Time) {
|
||
c.accept_deadline = deadline
|
||
}
|
||
|
||
pub fn (c &TcpListener) accept_timeout() time.Duration {
|
||
return c.accept_timeout
|
||
}
|
||
|
||
pub fn (mut c TcpListener) set_accept_timeout(t time.Duration) {
|
||
c.accept_timeout = t
|
||
}
|
||
|
||
pub fn (mut c TcpListener) wait_for_accept() ? {
|
||
return wait_for_read(c.sock.handle, c.accept_deadline, c.accept_timeout)
|
||
}
|
||
|
||
pub fn (mut c TcpListener) close() ? {
|
||
c.sock.close() ?
|
||
}
|
||
|
||
pub fn (c &TcpListener) addr() ?Addr {
|
||
return c.sock.address()
|
||
}
|
||
|
||
struct TcpSocket {
|
||
Socket
|
||
}
|
||
|
||
fn new_tcp_socket(family AddrFamily) ?TcpSocket {
|
||
handle := socket_error(C.socket(family, SocketType.tcp, 0)) ?
|
||
mut s := TcpSocket{
|
||
handle: handle
|
||
}
|
||
$if trace_tcp ? {
|
||
eprintln(' new_tcp_socket | s.handle: ${s.handle:6}')
|
||
}
|
||
|
||
// TODO(emily):
|
||
// we shouldnt be using ioctlsocket in the 21st century
|
||
// use the non-blocking socket option instead please :)
|
||
|
||
// TODO(emily):
|
||
// Move this to its own function on the socket
|
||
s.set_option_int(.reuse_addr, 1) ?
|
||
|
||
$if !net_blocking_sockets ? {
|
||
$if windows {
|
||
t := u32(1) // true
|
||
socket_error(C.ioctlsocket(handle, fionbio, &t)) ?
|
||
} $else {
|
||
socket_error(C.fcntl(handle, C.F_SETFL, C.fcntl(handle, C.F_GETFL) | C.O_NONBLOCK)) ?
|
||
}
|
||
}
|
||
return s
|
||
}
|
||
|
||
fn tcp_socket_from_handle(sockfd int) ?TcpSocket {
|
||
mut s := TcpSocket{
|
||
handle: sockfd
|
||
}
|
||
$if trace_tcp ? {
|
||
eprintln(' tcp_socket_from_handle | s.handle: ${s.handle:6}')
|
||
}
|
||
// s.set_option_bool(.reuse_addr, true)?
|
||
s.set_option_int(.reuse_addr, 1) ?
|
||
s.set_dualstack(true) or {
|
||
// Not ipv6, we dont care
|
||
}
|
||
$if !net_blocking_sockets ? {
|
||
$if windows {
|
||
t := u32(1) // true
|
||
socket_error(C.ioctlsocket(sockfd, fionbio, &t)) ?
|
||
} $else {
|
||
socket_error(C.fcntl(sockfd, C.F_SETFL, C.fcntl(sockfd, C.F_GETFL) | C.O_NONBLOCK)) ?
|
||
}
|
||
}
|
||
return s
|
||
}
|
||
|
||
pub fn (mut s TcpSocket) set_option_bool(opt SocketOption, value bool) ? {
|
||
// TODO reenable when this `in` operation works again
|
||
// if opt !in opts_can_set {
|
||
// return err_option_not_settable
|
||
// }
|
||
// if opt !in opts_bool {
|
||
// return err_option_wrong_type
|
||
// }
|
||
x := int(value)
|
||
socket_error(C.setsockopt(s.handle, C.SOL_SOCKET, int(opt), &x, sizeof(int))) ?
|
||
}
|
||
|
||
pub fn (mut s TcpSocket) set_dualstack(on bool) ? {
|
||
x := int(!on)
|
||
socket_error(C.setsockopt(s.handle, C.IPPROTO_IPV6, int(SocketOption.ipv6_only), &x,
|
||
sizeof(int))) ?
|
||
}
|
||
|
||
pub fn (mut s TcpSocket) set_option_int(opt SocketOption, value int) ? {
|
||
socket_error(C.setsockopt(s.handle, C.SOL_SOCKET, int(opt), &value, sizeof(int))) ?
|
||
}
|
||
|
||
fn (mut s TcpSocket) close() ? {
|
||
return shutdown(s.handle)
|
||
}
|
||
|
||
fn (mut s TcpSocket) @select(test Select, timeout time.Duration) ?bool {
|
||
return @select(s.handle, test, timeout)
|
||
}
|
||
|
||
const (
|
||
connect_timeout = 5 * time.second
|
||
)
|
||
|
||
fn (mut s TcpSocket) connect(a Addr) ? {
|
||
res := C.connect(s.handle, voidptr(&a), a.len())
|
||
if res == 0 {
|
||
return
|
||
}
|
||
|
||
// The socket is nonblocking and the connection cannot be completed
|
||
// immediately. (UNIX domain sockets failed with EAGAIN instead.)
|
||
// It is possible to select(2) or poll(2) for completion by selecting
|
||
// the socket for writing. After select(2) indicates writability,
|
||
// use getsockopt(2) to read the SO_ERROR option at level SOL_SOCKET to
|
||
// determine whether connect() completed successfully (SO_ERROR is zero) or
|
||
// unsuccessfully (SO_ERROR is one of the usual error codes listed here,
|
||
// ex‐ plaining the reason for the failure).
|
||
write_result := s.@select(.write, net.connect_timeout) ?
|
||
if write_result {
|
||
err := 0
|
||
len := sizeof(err)
|
||
socket_error(C.getsockopt(s.handle, C.SOL_SOCKET, C.SO_ERROR, &err, &len)) ?
|
||
|
||
if err != 0 {
|
||
return wrap_error(err)
|
||
}
|
||
// Succeeded
|
||
return
|
||
}
|
||
|
||
// Get the error
|
||
socket_error(C.connect(s.handle, voidptr(&a), a.len())) ?
|
||
|
||
// otherwise we timed out
|
||
return err_connect_timed_out
|
||
}
|