* keygen.c (keygen_get_std_prefs): Set reference count when creating the
[gnupg.git] / checks / genkey1024.test
index faaea2d..48d02da 100755 (executable)
@@ -1,60 +1,30 @@
 #!/bin/sh
 
-. defs.inc || exit 3
+. $srcdir/defs.inc || exit 3
 
-info "This expect script does not yet work"
-info "Please, all those expect gurus, can you help me with it?"
-exit 0
-
-expect - <<EOF
-set timeout -1
-match_max 100000
-spawn ../g10/gpg --no-batch --quick-random --homedir . --gen-key
-expect -exact "Please select the algorithm to use:\r
-   (1) ElGamal is the suggested one.\r
-   (2) DSA can only be used for signatures.\r
-Your selection? (1,2) "
-send -- "1\r"
-expect -exact "1\r
-\r                      \rAbout to generate a new ElGamal keypair.\r
-             minimum keysize is  768 bits\r
-             default keysize is 1024 bits\r
-    highest suggested keysize is 2048 bits\r
-What keysize do you want? (1024) "
-send -- "\r"
-expect -exact "\r
-\r                                \rRequested keysize is 1024 bits\r
-\r
-You need a User-ID to identify your key; the software constructs the user id\r
-from Real Name, Comment and Email Address in this form:\r
-    \"Heinrich Heine (Der Dichter) <heinrichh@uni-duesseldorf.de>\"\r
-\r
-Real name: "
-send -- "Harry H.\r"
-expect -exact "Harry H.\r
-\r                  \rEmail address: "
-send -- "hh@ddorf.de\r"
-expect -exact "hh@ddorf.de\r
-\r                         \rComment: "
-send -- "a test\r"
-expect -exact "a test\r
-\r              \rYou selected this USER-ID:\r
-    \"Harry H. (a test) <hh@ddorf.de> (INSECURE!)\"\r
-\r
-Edit (N)ame, (C)omment, (E)mail or (O)kay? "
-send -- "o\r"
-expect -exact "o\r
-\r                                           \rYou need a Passphrase to protect your secret key.\r
-\r
-Enter pass phrase: "
-send -- "abc\r"
-expect -ex "abc\r\n"
-expect -ex "\r                   \rRepeat pass phrase:\ "
-send -- "abc\r"
-expect -ex "abc\r\n"
-expect {
-    -ex "public and secret key created and signed.\r"
-    eof  abort
-}
+../g10/gpg --quiet --batch --quick-random --homedir . --gen-key <<EOF
+Key-Type: DSA
+Key-Length: 1024
+Subkey-Type: ELG-E
+Subkey-Length: 1024
+Name-Real: Harry H.
+Name-Comment: test key 
+Name-Email: hh@@ddorf.de
+Expire-Date: 1
+Passphrase: abc
+%commit
 EOF
 
+if have_pubkey_algo "RSA"; then
+../g10/gpg --quiet --batch --quick-random --homedir . --gen-key <<EOF
+Key-Type: RSA
+Key-Length: 1024
+Key-Usage: sign,encrypt
+Name-Real: Harry A.
+Name-Comment: RSA test key 
+Name-Email: hh@@ddorf.de
+Expire-Date: 2
+Passphrase: abc
+%commit
+EOF
+fi