TclTLS
Check-in [e7e4ce7d5b]
Login
HomeTimelineDownloadBrowse SourceBranchesTagsTicketsWiki
Overview
Comment:point to updated client/server key files
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: e7e4ce7d5bfd456aaaa400c6cbbea093c0513aed
User & Date: hobbs on 2002-02-04 22:45:26
Other Links: manifest | tags
Context
2002-02-04
22:45
* Makefile.in: removed strncasecmp from default object set. This is only needed on the Mac, and Tcl stubs provides it. check-in: 904004a153 user: hobbs tags: trunk
22:45
point to updated client/server key files check-in: e7e4ce7d5b user: hobbs tags: trunk
22:45
updated to load tls from build dir check-in: 0efce5e54e user: hobbs tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified tests/simpleClient.tcl from [3d5b5fbeb8] to [abd896c23b]. 

1
2
3
4
5
6
7
8

9
10

11
12

13
14
15
16
17
18
19

1
2
3
4
5
6
7

8
9

10
11

12
13
14
15
16
17
18
19








-
+

-
+

-
+








#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh8.3 "$0" ${1+"$@"}

package require tls

set dir			[file join [file dirname [info script]] ../tests/certs]
set OPTS(-cafile)	[file join $dir cacert.pem]
set OPTS(-cafile)	[file join $dir ca.pem]
set OPTS(-cert)		[file join $dir client.pem]
set OPTS(-key)		[file join $dir ckey.pem]
set OPTS(-key)		[file join $dir client.key]

set OPTS(-host)		localhost
set OPTS(-host)		lorax
set OPTS(-port)		2468
set OPTS(-debug)	1
set OPTS(-count)	8
set OPTS(-parallel)	1

foreach {key val} $argv {
    if {![info exists OPTS($key)]} {
︙

Modified tests/simpleServer.tcl from [86951f40b8] to [ca9a28f88d]. 

1
2
3
4
5
6
7
8

9
10

11
12
13
14
15
16
17

1
2
3
4
5
6
7

8
9

10
11
12
13
14
15
16
17








-
+

-
+








#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh8.3 "$0" ${1+"$@"}

package require tls

set dir			[file join [file dirname [info script]] ../tests/certs]
set OPTS(-cafile)	[file join $dir cacert.pem]
set OPTS(-cafile)	[file join $dir ca.pem]
set OPTS(-cert)		[file join $dir server.pem]
set OPTS(-key)		[file join $dir skey.pem]
set OPTS(-key)		[file join $dir server.key]

set OPTS(-port)	2468
set OPTS(-debug) 1
set OPTS(-require) 1

foreach {key val} $argv {
    if {![info exists OPTS($key)]} {
︙

Powered by Fossil · RSS