diff -r 044383f39525 -r be27ed110b50 buildframework/helium/tools/publish/evalid_multiple.pl --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/buildframework/helium/tools/publish/evalid_multiple.pl Wed Oct 28 14:39:48 2009 +0000 @@ -0,0 +1,48 @@ +#============================================================================ +#Name : evalid_multiple.pl +#Part of : Helium + +#Copyright (c) 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: +#============================================================================ + +#BEGIN { +# push (@INC, "\\epoc32\\tools"); +#} + +use strict; +use EvalidCompare; +use Getopt::Long; + +my $inputfile; +GetOptions( "f=s"=>\$inputfile) or die "/!\\ Error parsing command line."; + +my $time1 = time(); +open(IN,"<$inputfile") or die "/!\\ Can't open $inputfile"; +foreach my $file () +{ + chomp($file); + if (-f $file) + { + my ($MD5, $type) = &EvalidCompare::GenerateSignature($file); + print $file." TYPE=".$type." MD5=".$MD5."\n"; + } + else + { + print $file." not found\n"; + } +} +close IN; + +my $time2 = time();