common/tools/ats/bctest/ssl/ssl.pl
author SimonH <simonh@symbian.org>
Fri, 12 Mar 2010 14:16:11 +0000
changeset 924 a5ed0e6ca679
parent 668 9f3987efd3e5
permissions -rw-r--r--
findphysicaldrive.pl - Fixed so it works with empty (freshly formatted) drives.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
668
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     1
#!/usr/bin/perl
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     2
# Copyright (c) 2009 Symbian Foundation Ltd
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     3
# This component and the accompanying materials are made available
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     4
# under the terms of the License "Eclipse Public License v1.0"
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     5
# which accompanies this distribution, and is available
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     6
# at the URL "http://www.eclipse.org/legal/epl-v10.html".
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     7
#
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     8
# Initial Contributors:
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
     9
# Symbian Foundation Ltd - initial contribution.
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    10
#
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    11
# Contributors:
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    12
# Maciej Seroka <maciejs@symbian.org>
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    13
#
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    14
# Description:
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    15
# Script to build ATS test drop for Secure Socket Layer BC tests
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    16
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    17
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    18
use strict;
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    19
use File::Copy;
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    20
use File::Path;
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    21
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    22
unlink "ssltest.zip";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    23
rmtree "temp";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    24
mkpath "temp/ssltest/general/testframework";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    25
mkpath "temp/ssltest/winscw_udeb";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    26
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    27
my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    28
copy("ssl.xml",	"temp/test.xml");
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    29
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    30
copy($epoc . "winscw/c/testframework/crypto_test/testframework.ini",	"temp/ssltest/general/testframework/testframework.ini") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    31
copy($epoc . "winscw/c/testframework/crypto_test.cfg",	"temp/ssltest/general/testframework/crypto_test.cfg") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    32
copy($epoc . "winscw/c/testframework/evptests.txt",		"temp/ssltest/general/testframework/evptests.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    33
copy($epoc . "winscw/c/tpkcs7d.txt",					"temp/ssltest/general/testframework/tpkcs7d.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    34
copy($epoc . "winscw/c/tpkcs7.txt",						"temp/ssltest/general/testframework/tpkcs7.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    35
copy($epoc . "winscw/c/treq2.txt",						"temp/ssltest/general/testframework/treq2.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    36
copy($epoc . "winscw/c/treq.txt",						"temp/ssltest/general/testframework/treq.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    37
copy($epoc . "winscw/c/trsa.txt",						"temp/ssltest/general/testframework/trsa.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    38
copy($epoc . "winscw/c/tsid.txt",						"temp/ssltest/general/testframework/tsid.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    39
copy($epoc . "winscw/c/tx5091.txt",						"temp/ssltest/general/testframework/tx5091.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    40
copy($epoc . "winscw/c/tx5092.txt",						"temp/ssltest/general/testframework/tx5092.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    41
copy($epoc . "winscw/c/tx509.txt",						"temp/ssltest/general/testframework/tx509.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    42
copy($epoc . "winscw/c/tcrl.txt",						"temp/ssltest/general/testframework/tcrl.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    43
copy($epoc . "winscw/c/testenc.txt",					"temp/ssltest/general/testframework/testenc.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    44
copy($epoc . "winscw/c/testgen.txt",					"temp/ssltest/general/testframework/testgen.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    45
copy($epoc . "winscw/c/testss.txt",						"temp/ssltest/general/testframework/testss.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    46
copy($epoc . "winscw/c/test_verify.txt",				"temp/ssltest/general/testframework/test_verify.txt") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    47
copy($epoc . "winscw/c/CAss.cnf",						"temp/ssltest/general/testframework/CAss.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    48
copy($epoc . "winscw/c/openssl.cnf",					"temp/ssltest/general/testframework/openssl.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    49
copy($epoc . "winscw/c/P1ss.cnf",						"temp/ssltest/general/testframework/P1ss.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    50
copy($epoc . "winscw/c/P2ss.cnf",						"temp/ssltest/general/testframework/P2ss.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    51
copy($epoc . "winscw/c/test.cnf",						"temp/ssltest/general/testframework/test.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    52
copy($epoc . "winscw/c/Uss.cnf",						"temp/ssltest/general/testframework/Uss.cnf") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    53
copy($epoc . "winscw/c/argena.pem",						"temp/ssltest/general/testframework/argena.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    54
copy($epoc . "winscw/c/argeng.pem",						"temp/ssltest/general/testframework/argeng.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    55
copy($epoc . "winscw/c/eng1.pem",						"temp/ssltest/general/testframework/eng1.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    56
copy($epoc . "winscw/c/eng2.pem",						"temp/ssltest/general/testframework/eng2.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    57
copy($epoc . "winscw/c/eng3.pem",						"temp/ssltest/general/testframework/eng3.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    58
copy($epoc . "winscw/c/eng4.pem",						"temp/ssltest/general/testframework/eng4.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    59
copy($epoc . "winscw/c/eng5.pem",						"temp/ssltest/general/testframework/eng5.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    60
copy($epoc . "winscw/c/pkcs7-1.pem",					"temp/ssltest/general/testframework/pkcs7-1.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    61
copy($epoc . "winscw/c/RegTP-5R.pem",					"temp/ssltest/general/testframework/RegTP-5R.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    62
copy($epoc . "winscw/c/RegTP-6R.pem",					"temp/ssltest/general/testframework/RegTP-6R.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    63
copy($epoc . "winscw/c/testcrl.pem",					"temp/ssltest/general/testframework/testcrl.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    64
copy($epoc . "winscw/c/testp7.pem",						"temp/ssltest/general/testframework/testp7.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    65
copy($epoc . "winscw/c/testreq.pem",					"temp/ssltest/general/testframework/testreq.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    66
copy($epoc . "winscw/c/testreq2.pem",					"temp/ssltest/general/testframework/testreq2.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    67
copy($epoc . "winscw/c/testrsa.pem",					"temp/ssltest/general/testframework/testrsa.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    68
copy($epoc . "winscw/c/testsid.pem",					"temp/ssltest/general/testframework/testsid.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    69
copy($epoc . "winscw/c/testx509.pem",					"temp/ssltest/general/testframework/testx509.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    70
copy($epoc . "winscw/c/thawteCb.pem",					"temp/ssltest/general/testframework/thawteCb.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    71
copy($epoc . "winscw/c/thawteCp.pem",					"temp/ssltest/general/testframework/thawteCp.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    72
copy($epoc . "winscw/c/v3-cert1.pem",					"temp/ssltest/general/testframework/v3-cert1.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    73
copy($epoc . "winscw/c/v3-cert2.pem",					"temp/ssltest/general/testframework/v3-cert2.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    74
copy($epoc . "winscw/c/vsign1.pem",						"temp/ssltest/general/testframework/vsign1.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    75
copy($epoc . "winscw/c/vsign3.pem",						"temp/ssltest/general/testframework/vsign3.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    76
copy($epoc . "winscw/c/vsignss.pem",					"temp/ssltest/general/testframework/vsignss.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    77
copy($epoc . "winscw/c/wellsfgo.pem",					"temp/ssltest/general/testframework/wellsfgo.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    78
copy($epoc . "winscw/c/certCA.ss",						"temp/ssltest/general/testframework/certCA.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    79
copy($epoc . "winscw/c/certU.ss",						"temp/ssltest/general/testframework/certU.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    80
copy($epoc . "winscw/c/keyCA.ss",						"temp/ssltest/general/testframework/keyCA.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    81
copy($epoc . "winscw/c/keyU.ss",						"temp/ssltest/general/testframework/keyU.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    82
copy($epoc . "winscw/c/reqCA.ss",						"temp/ssltest/general/testframework/reqCA.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    83
copy($epoc . "winscw/c/reqU.ss",						"temp/ssltest/general/testframework/reqU.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    84
copy($epoc . "winscw/c/reqCA.ss2",						"temp/ssltest/general/testframework/reqCA.ss2") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    85
copy($epoc . "winscw/c/certP1.ss",						"temp/ssltest/general/testframework/certP1.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    86
copy($epoc . "winscw/c/certP2.ss",						"temp/ssltest/general/testframework/certP2.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    87
copy($epoc . "winscw/c/intP1.ss",						"temp/ssltest/general/testframework/intP1.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    88
copy($epoc . "winscw/c/intP2.ss",						"temp/ssltest/general/testframework/intP2.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    89
copy($epoc . "winscw/c/keyP1.ss",						"temp/ssltest/general/testframework/keyP1.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    90
copy($epoc . "winscw/c/keyP2.ss",						"temp/ssltest/general/testframework/keyP2.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    91
copy($epoc . "winscw/c/reqP1.ss",						"temp/ssltest/general/testframework/reqP1.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    92
copy($epoc . "winscw/c/reqP2.ss",						"temp/ssltest/general/testframework/reqP2.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    93
copy($epoc . "winscw/c/tmp_intP2.ss",					"temp/ssltest/general/testframework/tmp_intP2.ss") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    94
copy($epoc . "winscw/c/Makefile",						"temp/ssltest/general/testframework/Makefile") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    95
copy($epoc . "winscw/c/ca_cert.der",					"temp/ssltest/general/testframework/ca_cert.der") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    96
copy($epoc . "winscw/c/ca_cert.pem",					"temp/ssltest/general/testframework/ca_cert.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    97
copy($epoc . "winscw/c/server.pem",						"temp/ssltest/general/testframework/server.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    98
copy($epoc . "winscw/c/server2.pem",					"temp/ssltest/general/testframework/server2.pem") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
    99
copy($epoc . "release/winscw/udeb/crypto_test.dll",		"temp/ssltest/winscw_udeb/crypto_test.dll") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
   100
copy($epoc . "release/winscw/udeb/openssl.exe",			"temp/ssltest/winscw_udeb/openssl.exe") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
   101
copy($epoc . "release/winscw/udeb/ssltest.exe",			"temp/ssltest/winscw_udeb/ssltest.exe") or die "failed : $!";
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
   102
9f3987efd3e5 Added new BC test
Maciej Seroka <maciejs@symbian.org>
parents:
diff changeset
   103
system("7z a -tzip ssltest.zip ./temp/*");