Differences From Artifact [24f9bfe9d5]:

• File tests/keytest2.tcl — part of check-in [b423807e0e] at 2003-07-07 20:24:49 on branch trunk — * tls.c (Tls_Init): added tls::misc command provided by * tlsX509.c: Wojciech Kocjan (wojciech kocjan.org) * tests/keytest1.tcl: to expose more low-level SSL commands * tests/keytest2.tcl: (user: hobbs, size: 121) [annotate] [blame] [check-ins using]

To Artifact [9ae291a22a]:

• Executable file tests/keytest2.tcl — part of check-in [baa98c9b5d] at 2016-11-29 23:46:42 on branch tls-1-7 — Updated key tests (user: rkeene, size: 241) [annotate] [blame] [check-ins using] [more...]

1
2
3
4
5
6
7
8

1
2
3
4
5
6
7
8
9
10

+
+
+







-

#! /usr/bin/env tclsh

set auto_path [linsert $auto_path 0 [file normalize [file join [file dirname [info script]] ..]]]
package require tls

set s [tls::socket 127.0.0.1 12300]
puts $s "A line"
flush $s
puts [join [tls::status $s] \n]
exit