Some configuration changes
[gnupg.git] / checks / genkey1024.test
1 #!/bin/sh
2
3 echo "test is currently disabled"
4 exit 0
5
6
7 . $srcdir/defs.inc || exit 3
8 ignore_errors=yes
9
10
11 if (expect -v) < /dev/null > /dev/null 2>&1 ; then
12   :
13 else
14   echo "\"expect\" needed but not found - test skipped"
15   exit 0
16 fi
17
18 LANG=
19 LANGUAGE=
20
21 expect  - <<EOF >/dev/null
22 #set timeout -1
23 set timeout 8
24 match_max 100000
25 spawn ../g10/gpg --no-batch --homedir . --gen-key
26 expect {
27     -exact "Please select what kind of key you want:\r
28    (1) DSA and ElGamal (default)\r
29    (2) DSA (sign only)\r
30    (4) ElGamal (sign and encrypt)\r
31 Your selection? "  { send -- "1\r" }
32     timeout { exit 1 } }
33 expect {
34     -exact "1\r
35 \r                 \rDSA keypair will have 1024 bits.\r
36 About to generate a new ELG-E keypair.\r
37               minimum keysize is  768 bits\r
38               default keysize is 1024 bits\r
39     highest suggested keysize is 2048 bits\r
40 What keysize do you want? (1024) " { send -- "\r" }
41     timeout { exit 1 } }
42 expect {
43     -exact "\r
44 \r                                 \rRequested keysize is 1024 bits\r
45 Please specify how long the key should be valid.\r
46          0 = key does not expire\r
47       <n>  = key expires in n days\r
48       <n>w = key expires in n weeks\r
49       <n>m = key expires in n months\r
50       <n>y = key expires in n years\r
51 Key is valid for? (0) " { send -- "1\r" }
52     timeout { exit 1 } }
53 expect {
54      -exact "1\r
55 \r                       \rKey expires at " { }
56     timeout { exit 1 } }
57 expect {
58      -re "(.*)\r
59 " {}
60     timeout { exit 1 } }
61 expect {
62     -exact "Is this correct (y/n)? " { send -- "y\r" }
63     timeout { exit 1 } }
64 expect {
65     -exact "y\r
66 \r                        \r\r
67 You need a User-ID to identify your key; the software constructs the user id\r
68 from Real Name, Comment and Email Address in this form:\r
69     \"Heinrich Heine (Der Dichter) <heinrichh@duesseldorf.de>\"\r
70 \r
71 Real name: " { send -- "Harry H.\r" }
72     timeout { exit 1 } }
73 expect {
74    -exact "Harry H.\r
75 \r                   \rEmail address: " { send -- "hh@ddorf.de\r" }
76     timeout { exit 1 } }
77 expect {
78    -exact "hh@ddorf.de\r
79 \r                          \rComment: " { send -- "a test\r" }
80     timeout { exit 1 } }
81 expect {
82    -exact "a test\r
83 \r               \rYou selected this USER-ID:\r
84     \"Harry H. (a test) <hh@ddorf.de>\"\r
85 \r
86 Change (N)ame, (C)omment, (E)mail or (O)kay/(Q)uit? " { send -- "o\r" }
87     timeout { exit 1 } }
88 expect {
89    -exact "o\r
90 \r                                                     \rYou need a Passphrase to protect your secret key.\r
91 \r
92 Enter passphrase: " { sleep 1; send -- "abc\r" }
93     timeout { exit 1 } }
94 expect {
95   -ex "\r                  \rRepeat passphrase: " { sleep 1; send -- "abc\r" }
96     timeout { exit 1 } }
97 set timeout 600
98 expect {
99     -re "^.*\r\npublic and secret key" { exit 0 }
100     eof  { exit 1 }
101 }
102 exit 1
103 EOF
104
105 #*-*wedit:notab*-*