remote-host ( -- string )

Vocabulary

furnace.sessions

Inputs

None

Outputs

string

an object

Definition

USING: accessors combinators.short-circuit http io.sockets
namespaces ;

IN: furnace.sessions

: remote-host ( -- string )
    {
        [ request get "x-forwarded-for" header ]
        [ remote-address get host>> ]
    } 0|| ;