1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; indent-tabs-mode: nil -*-
3 ;;; --- Special variable definitions.
6 (in-package :net.sockets
)
9 (handler-case (%socket af-inet6 sock-stream ipproto-ip
)
10 (nix:eafnosupport
() nil
)
11 (:no-error
(ret) (declare (ignore ret
)) t
))
12 "Specifies the default behaviour with respect to IPv6:
13 - nil : Only IPv4 addresses are used.
14 - :ipv6 : Only IPv6 addresses are used.
15 - t : If both IPv4 and IPv6 addresses are found they are returned in the best order possible (see RFC 3484).
18 (deftype *ipv6
*-type
()
19 '(member t nil
:ipv6
))
21 (defconstant +max-backlog-size
+ somaxconn
22 "Maximum length of the pending connections queue (hard limit).")
24 (defvar *default-backlog-size
* 5
25 "Default length of the pending connections queue (soft limit).")
27 (defvar *default-linger-seconds
* 15
28 "Default linger timeout when enabling SO_LINGER option on a socket.")