secureswitools/swisistools/test/tsignsis/createandsignunicode.pl
changeset 0 ba25891c3a9e
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/secureswitools/swisistools/test/tsignsis/createandsignunicode.pl	Thu Dec 17 08:51:10 2009 +0200
@@ -0,0 +1,77 @@
+#
+# Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).
+# All rights reserved.
+# This component and the accompanying materials are made available
+# under the terms of the License "Eclipse Public License v1.0"
+# which accompanies this distribution, and is available
+# at the URL "http://www.eclipse.org/legal/epl-v10.html".
+#
+# Initial Contributors:
+# Nokia Corporation - initial contribution.
+#
+# Contributors:
+#
+# Description: 
+#
+
+
+
+	use File::Basename;
+	my $toworkindir= dirname $0;
+	print "Changing dir to $toworkindir\n";
+	chdir $toworkindir;
+
+	$logFile = "\\epoc32\\winscw\\c\\createandsignunicode.txt";
+
+	#
+# Counters for results
+#
+$NumberOfTests  = 3;
+$NumberOfPassed = 3;
+$NumberOfFailed = 0;
+	#
+	#Function to write log into file
+	#
+sub WriteLog 
+	{
+	my ($log) = @_;
+	unless( open($fh, ">> $logFile")) 
+		{
+		printf STDERR "Can\'t open $logfile:$!\n";
+		return;
+		}
+	printf $fh $log;
+	printf $log;
+	close $fh;
+	}
+
+  	# For creating unicode based sis files for NQP
+	system ("WScript.exe createnunicodefile.vbs");
+	system("createnormalsis.pl");
+	system("WScript.exe renameunicode.vbs");
+	system("WScript.exe signunicodesis.vbs");
+
+	#For Embeded SIS file
+	system("createembededsis.pl");
+	system("WScript.exe signembededunicodesis.vbs");
+
+	#For creating the SIS file which produces large data, 
+	#moved to this stuff as ONB was failing being this pkg file in tsisfile dir.
+	system("unzip -q -o largefile.zip");
+	system("makesis largedata.pkg");
+	system("signsis -s largedata.sis largedata.sis default.cer 	default.key");
+
+
+	#Copy the sis files to Z drive
+	system "copytozdrive.bat";
+
+	system("del /f largefile.txt");
+	unlink($logFile);
+	WriteLog("Created test data for NQP.\n\n");
+	#
+# Display the result
+#
+WriteLog("\n\nTests completed OK\n");
+WriteLog(sprintf "Run: %d\n", $NumberOfTests );
+WriteLog(sprintf "Passed: %d\n", $NumberOfPassed );
+WriteLog(sprintf "%d tests failed out of %d\n", $NumberOfFailed, $NumberOfTests );