(client) ( remote -- client-in client-out local )

Vocabulary

io.sockets.private

Inputs

remote

an object

Outputs

client-in	an object
client-out	an object
local	an object

Definition

IN: io.sockets.private

GENERIC: (client) ( remote -- client-in client-out local )

Methods

USING: arrays continuations io.sockets.private sequences ;

M: array (client) [ (client) 3array ] attempt-all first3 ;


USING: io.sockets io.sockets.private ;

M: inet (client) resolve-host (client) ;


USING: destructors io.sockets.private kernel ;

M: object (client)
    [
        [ remote>handle ] keep [
            [ <ports> [ |dispose ] bi@ dup ] dip
            establish-connection
        ] [ get-local-address ] 2bi
    ] with-destructors ;


USING: accessors destructors io.sockets io.sockets.private
io.sockets.secure kernel ;

M: secure-inet (client)
    [
        [ resolve-host (client) [ |dispose ] dip ] keep
        addrspec>> host>> pick handle>> check-certificate
    ] with-destructors ;