graphicsdeviceinterface/directgdi/test/scripts/convert.pl
changeset 0 5d03bc08d59c
equal deleted inserted replaced
-1:000000000000 0:5d03bc08d59c
       
     1 # Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).
       
     2 # All rights reserved.
       
     3 # This component and the accompanying materials are made available
       
     4 # under the terms of "Eclipse Public License v1.0"
       
     5 # which accompanies this distribution, and is available
       
     6 # at the URL "http://www.eclipse.org/legal/epl-v10.html".
       
     7 #
       
     8 # Initial Contributors:
       
     9 # Nokia Corporation - initial contribution.
       
    10 #
       
    11 # Contributors:
       
    12 #
       
    13 # Description:
       
    14 #
       
    15 
       
    16 # Directory of the reference images
       
    17 my @files = `dir .\\ref\\*.mbm /B`;
       
    18 
       
    19 # Convert all the reference images under its directory from .mbm to .bmp files
       
    20 foreach $file (@files)
       
    21 {
       
    22 	chomp $file;
       
    23 	my $bmpfile;
       
    24 	$bmpfile = $file;
       
    25 	$bmpfile =~ s/^(.*)mbm/$1bmp/;
       
    26 	my $cmd = "bmconv /u .\\ref\\$file .\\ref\\$bmpfile";
       
    27 	print "$cmd\n";
       
    28 	print `$cmd`;
       
    29 }
       
    30 
       
    31 # Directory of the test images
       
    32 my @files = `dir .\\test\\*.mbm /B`;
       
    33 
       
    34 # Convert all the test images under its directory from .mbm to .bmp files
       
    35 foreach $file (@files)
       
    36 {
       
    37 	chomp $file;
       
    38 	my $bmpfile;
       
    39 	$bmpfile = $file;
       
    40 	$bmpfile =~ s/^(.*)mbm/$1bmp/;
       
    41 	my $cmd = "bmconv /u .\\test\\$file .\\test\\$bmpfile";
       
    42 	print "$cmd\n";
       
    43 	print `$cmd`;
       
    44 }
       
    45