open-tcp-stream hostspec service &key direction element-type errorp read-timeout write-timeout timeout ssl-ctx ctx-configure-callback ssl-configure-callback local-address ipv6 local-port nodelay keepalive => stream
An integer or string or an ipv6-address object.
A string or a fixnum.
One of :input
, :output
or :io
.
base-char
or a subtype of integer
.
A boolean.
A positive number, or nil
.
A positive number, or nil
.
A positive number, or nil
.
A symbol or a foreign pointer.
A function designator or nil
. The default value is nil
.
A function designator or nil
. The default value is nil
.
nil
, an integer, a string or a ipv6-address object.
nil
, t
or :any
.
nil
, a string or a fixnum.
A generalized boolean.
A generalized boolean.
The function open-tcp-stream
attempts to connect to a socket on a server and returns stream for the connection if successful.
The IP address to connect to is specified by hostspec, and the service to provide is specified by service. These two arguments are interpreted as described in Specifying the target for connecting and binding a socket.
The direction of the connection is given by direction. Its default value is :io
. The element type of the connection is determined from element-type, and is base-char
by default.
If errorp is nil
, failure to connect (possibly after timeout seconds) returns nil
, otherwise an error is signaled.
timeout specifies a connection timeout. open-tcp-stream
waits for at most timeout seconds for the TCP connection to be made. If timeout is nil
it waits until the connection attempt succeeds or fails. On failure, open-tcp-stream
signals an error or returns nil
according to the value of errorp. To provide a timeout for reads after the connection is made, see read-timeout. The default value of timeout is nil
.
read-timeout specifies the read timeout of the stream. If it is nil
(the default), the stream does not time out during reads, and these may hang. See socket-stream for more details. To provide a connection timeout, see timeout.
write-timeout is similar to read-timeout, but for writes. See socket-stream for more details.
ssl-ctx, ctx-configure-callback and ssl-configure-callback are interpreted as described for socket-stream. Unlike the other ways of creating a socket stream with SSL processing, open-tcp-stream
does not take the ssl-side argument and always uses the value :client
.
If local-address is nil
then the operating system chooses the local address of the socket. Otherwise the value is interpreted as for hostspec and specifies the local address of the socket. The default value of local-address is nil
.
If local-port is nil
then the operating system chooses the local port of the socket. Otherwise the string or fixnum value is interpreted as for service and specifies the local port of the socket. The default value of local-port is nil
.
ipv6 specifies the address family to use when hostspec is a string. When ipv6 is :any
, open-tcp-stream
uses either of IPv4 or IPv6. When ipv6 is t
, it uses only IPv6 addresses, and when ipv6 is nil
it tries only IPv4. The default value of ipv6 is :any
.
If keepalive is true, SO_KEEPALIVE is set on the socket. The default value of keepalive is nil
.
If nodelay is true, TCP_NODELAY is set on the socket. The default value of nodelay is t
.
/etc/services
. If it is not there, the manual entry for services can be used to find it.cl:listen
is not reliable on them. They also verify the host, which ordinary sockets do not currently do, in the same way that the default in open-tcp-stream-using-java does. See Socket streams with Java sockets and SSL on Android for a full description, and open-tcp-stream-using-java for details about verification and which keywords are used.The following example opens an HTTP connection to a given host, and retrieves the root page:
(with-open-stream (http (comm:open-tcp-stream
"www.lispworks.com" 80))
(format http "GET / HTTP/1.0~C~C~C~C"
(code-char 13) (code-char 10)
(code-char 13) (code-char 10))
(force-output http)
(write-string "Waiting to reply...")
(loop for ch = (read-char-no-hang http nil :eof)
until ch
do (write-char #\.)
(sleep 0.25)
finally (unless (eq ch :eof)
(unread-char ch http)))
(terpri)
(loop for line = (read-line http nil nil)
while line
do (write-line line)))
connect-to-tcp-server
start-up-server
socket-stream
socket-stream-shutdown
switch-open-tcp-stream-with-ssl-to-java
open-tcp-stream-using-java
LispWorks User Guide and Reference Manual - 13 Feb 2015