/usr/share/doc/racket/win32-ssl/blueboxes.rktd is in racket-doc 6.1-4.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 | 352
((3) 0 () 1 ((q lib "net/win32-ssl.rkt")) () (h ! (equal) ((c def c (c (? . 0) q win32-ssl-connect)) q (0 . 12)) ((c def c (c (? . 0) q win32-ssl-available?)) q (1025 . 2)) ((c def c (c (? . 0) q ports->win32-ssl-ports)) q (563 . 10)) ((c def c (c (? . 0) q win32-ssl-port?)) q (964 . 3)) ((c def c (c (? . 0) q win32-ssl-abandon-port)) q (463 . 3))))
procedure
(win32-ssl-connect hostname
port-no
[client-protocol])
-> (and/c input-port? win32-ssl-port?)
(and/c output-port? win32-ssl-port?)
hostname : string?
port-no : (integer-in 1 65535)
client-protocol : (or/c 'sslv2-or-v3 = 'sslv2-or-v3
'sslv2
'sslv3
'tls)
procedure
(win32-ssl-abandon-port in) -> void?
in : (and/c win32-ssl-port? output-port?)
procedure
(ports->win32-ssl-ports input-port
output-port
[#:encrypt protocol])
-> (and/c input-port? win32-ssl-port?)
(and/c output-port? win32-ssl-port?)
input-port : input-port?
output-port : output-port?
protocol : (or/c 'sslv2-or-v3 'sslv2 'sslv3 'tls)
= 'sslv2-or-v3
procedure
(win32-ssl-port? v) -> boolean?
v : any/c
value
win32-ssl-available? : boolean?
|