chiark / gitweb /
etc/config.tcl: Hack for testing.
[ca] / etc / config.tcl
CommitLineData
69ab55f7
MW
1### -*-tcl-*-
2
c4e3d3a6
MW
3set C(ca-owner) "root"
4set C(ca-group) "ca"
5
6set C(ca-name) {
7 countryName "GB"
8 stateOrProvinceName "Cambridgeshire"
9 localityName "Cambridge"
10 organizationName "distorted.org.uk"
11 commonName "distorted.org.uk Certificate Authority"
12 emailAddress "ca@distorted.org.uk"
13}
69ab55f7 14
44df1a01
MW
15set C(ca-name) {
16 countryName "GB"
17 stateOrProvinceName "Cambridgeshire"
18 localityName "Cambridge"
19 organizationName "distorted.org.uk"
20 commonName "Test Certificate Authority -- do not trust"
21 emailAddress "mdw@distorted.org.uk"
22}
23
69ab55f7
MW
24set P(tls-client) {
25 extensions tls-client-extensions
00e8593b 26 issue-time "*-*-* 00:00:00"
69ab55f7 27 start-skew 1
a7411024 28 expire-interval 32
69ab55f7
MW
29}
30
31set P(tls-server) {
32 extensions tls-server-extensions
00e8593b 33 issue-time "*-*-* 00:00:00"
69ab55f7 34 start-skew 1
a7411024 35 expire-interval 32
69ab55f7 36}
1fc4577e 37
c6fcdcc3
MW
38set P(tls-server-longterm) {
39 extensions tls-server-extensions
40 issue-time "*-*-* 00:00:00"
41 start-skew 1
42 expire-interval 43838
43}
44
1fc4577e 45proc update-hook {} {
44df1a01
MW
46 puts -nonewline "Send to:"
47 foreach host {ustrat uartist} {
48 exec rsync -avD ca.cert crl cert req $host:etc/ca/
49 puts -nonewline " $host"
7e0f58bf 50 }
44df1a01 51 puts "."
1fc4577e 52}