1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/graphics/graphicsapitest/screendriverhaitest/group/testdriversetup.pl Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,81 @@
1.4 +#
1.5 +# Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).
1.6 +# All rights reserved.
1.7 +# This component and the accompanying materials are made available
1.8 +# under the terms of "Eclipse Public License v1.0"
1.9 +# which accompanies this distribution, and is available
1.10 +# at the URL "http://www.eclipse.org/legal/epl-v10.html".
1.11 +#
1.12 +# Initial Contributors:
1.13 +# Nokia Corporation - initial contribution.
1.14 +#
1.15 +# Contributors:
1.16 +#
1.17 +# Description:
1.18 +#
1.19 +
1.20 +use Getopt::Long;
1.21 +use Cwd;
1.22 +
1.23 +
1.24 +sub Usage()
1.25 + {
1.26 + print <<USAGE_EOF;
1.27 +Usage
1.28 +perl testdriversetup.pl --statlite=StatLite
1.29 +
1.30 + StatLite = [true | false ]
1.31 +
1.32 + --help : This help
1.33 +USAGE_EOF
1.34 + exit( 0 )
1.35 + }
1.36 +
1.37 +sub main()
1.38 + {
1.39 + my $help='';
1.40 + my $statLite="";
1.41 +
1.42 + GetOptions(
1.43 + 'statlite=s'=> \$statLite,
1.44 + 'help' => \$help
1.45 + );
1.46 +
1.47 + if($help or (($statLite ne "true") and ($statLite ne "false")) )
1.48 + {
1.49 + Usage();
1.50 + exit(0);
1.51 + }
1.52 +
1.53 + my $theEpocRoot=$ENV{EPOCROOT};
1.54 + my $epoc32Location="$theEpocRoot.\\epoc32";
1.55 +
1.56 + my $currentDirectory=cwd;
1.57 + $currentDirectory =~ s/Group//i;
1.58 + $currentDirectory =~ s/\//\\/g;
1.59 +
1.60 + my $currentDrive = substr($currentDirectory,0,2);
1.61 +
1.62 + my $cmd="TestDriver config";
1.63 + my $suite="file:/$currentDrive$epoc32Location\\testdriver\\salt\\screendriverhai.driver";
1.64 + $suite =~ s.\\./.g;
1.65 + $suite =~ s\/./\/\g;
1.66 +
1.67 + $cmd .= " --bldclean OFF";
1.68 + $cmd .= " --bldmake OFF";
1.69 + $cmd .= " -e $currentDrive$theEpocRoot";
1.70 + $cmd .= " -x $currentDrive$epoc32Location\\testdriver\\salt";
1.71 + $cmd .= " --repos $currentDrive$epoc32Location\\testdriver\\Repository";
1.72 + $cmd .= " -c $currentDrive$epoc32Location\\testdriver\\Results";
1.73 + $cmd .= " -i $currentDirectory";
1.74 + $cmd .= " -s $suite";
1.75 + $cmd .= " --source $currentDirectory";
1.76 + $cmd .= " --tp $currentDirectory";
1.77 + $cmd .= " --testexec true";
1.78 + $cmd .= " --statlite $statLite";
1.79 + $cmd .= " --teflite true";
1.80 + $cmd .= " --commdb overwrite";
1.81 + system("$cmd");
1.82 + }
1.83 +
1.84 +main();