Here the test file ...
Sorry Michael
--
_______________________________________________________________
Michael Bell Humboldt-Universitaet zu Berlin
Tel.: +49 (0)30-2093 2482 ZE Computer- und Medienservice
Fax: +49 (0)30-2093 2704 Unter den Linden 6
[EMAIL PROTECTED] D-10099 Berlin
_______________________________________________________________
## do not activate this
## perl returns not zero even if there is no error
## frustrating ...
## set -e
## move away the already existing CA stuff
if test -e /home/michael/OpenCA/Test/test_Pg/OpenCA/var/crypto/keys/cakey.pem;
then
mv /home/michael/OpenCA/Test/test_Pg/OpenCA/var/crypto/keys/cakey.pem
/home/michael/OpenCA/Test/test_Pg/OpenCA/var/crypto/keys/cakey.pem.$$
fi
## define the client
export
OPENCA_SOCKET=/home/michael/OpenCA/Test/test_Pg/OpenCA/var/tmp/openca_socket
PERLCODE="use lib '/home/michael/OpenCA/Test/test_Pg/modules/perl5';use
OpenCA::UI::Shell::Client;"
## create a CA private key
echo Testing CA key generation ... > /dev/stderr
perl -e "$PERLCODE" <<EOF
1
0
rsa
1024
aes128
root
root
12345678
0
EOF
## create a CA request
echo Testing CA request generation ... > /dev/stderr
perl -e "$PERLCODE" <<EOF
1
1
[EMAIL PROTECTED]
OpenCA::UI::Shell Test
HU-CA
Humboldt-Universitaet zu Berlin
DE
root
root
12345678
0
EOF
