factor/basis/io/sockets/secure/unix/debug/debug.factor

! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors io.sockets.secure kernel ;
IN: io.sockets.secure.unix.debug

: with-test-context ( quot -- )
    <secure-config>
        "vocab:openssl/test/server.pem" >>key-file
        "vocab:openssl/test/dh1024.pem" >>dh-file
        "password" >>password
    swap with-secure-context ; inline
Move underlying-handle word from io.launcher to io.ports, add a new underlying-port word Add a remote-address symbol to io.sockets, with-client binds it, ditto for io.servers.connection io.sockets.secure now has two new words, send-secure-handshake, accept-secure-handshake, to upgrade existing connections 2008-11-30 14:46:39 -05:00			`! Copyright (C) 2008 Slava Pestov.`
			`! See http://factorcode.org/license.txt for BSD license.`
			`USING: accessors io.sockets.secure kernel ;`
io.files split up and general refactoring work in progress 2008-12-14 21:03:00 -05:00			`IN: io.sockets.secure.unix.debug`
Move underlying-handle word from io.launcher to io.ports, add a new underlying-port word Add a remote-address symbol to io.sockets, with-client binds it, ditto for io.servers.connection io.sockets.secure now has two new words, send-secure-handshake, accept-secure-handshake, to upgrade existing connections 2008-11-30 14:46:39 -05:00
			`: with-test-context ( quot -- )`
			`<secure-config>`
Add vocab: for vocab-relative paths 2009-02-15 20:53:21 -05:00			`"vocab:openssl/test/server.pem" >>key-file`
			`"vocab:openssl/test/dh1024.pem" >>dh-file`
Move underlying-handle word from io.launcher to io.ports, add a new underlying-port word Add a remote-address symbol to io.sockets, with-client binds it, ditto for io.servers.connection io.sockets.secure now has two new words, send-secure-handshake, accept-secure-handshake, to upgrade existing connections 2008-11-30 14:46:39 -05:00			`"password" >>password`
			`swap with-secure-context ; inline`