author | Johan Groth <johang@symbian.org> |
Thu, 07 Oct 2010 15:08:50 +0100 | |
changeset 1294 | 6a48e8922c95 |
parent 797 | cbc760a5fedd |
permissions | -rw-r--r-- |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
1 |
#!/usr/bin/perl |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
2 |
|
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
3 |
use strict; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
4 |
use File::Copy; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
5 |
use File::Path; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
6 |
|
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
7 |
unlink "graphicssvs.zip"; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
8 |
rmtree "temp"; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
9 |
mkpath "temp/graphicssvs/graphics/general"; |
631 | 10 |
mkpath "temp/graphicssvs/graphics/winscw/general"; |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
11 |
mkpath "temp/graphicssvs/winscw_udeb"; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
12 |
mkpath "temp/graphicssvs/graphics/t_fbservapi/general"; |
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
13 |
|
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
14 |
my $epoc=$ENV{'EPOCROOT'} . "epoc32/"; |
631 | 15 |
copy("graphicssvs.xml", "temp/test.xml"); |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
16 |
|
797
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
17 |
copy $epoc . "release/winscw/udeb/t_fbservapi.exe", "temp/graphicssvs/winscw_udeb/t_fbservapi.exe" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
18 |
copy $epoc . "release/winscw/udeb/z/graphics/t_graphics.ini", "temp/graphicssvs/graphics/general/t_graphics.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
19 |
copy $epoc . "release/winscw/udeb/z/graphics/winscw/t_graphics.ini", "temp/graphicssvs/graphics/winscw/general/t_graphics.ini" or die "failed : $!"; |
487
80174516a610
fixed up the ats errors with graphics svs
Brendan Donegan brendand@symbian.org
parents:
409
diff
changeset
|
20 |
|
797
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
21 |
copy $epoc . "release/winscw/udeb/z/graphics/t_graphics.tcs", "temp/graphicssvs/graphics/general/graphics-fbserv-publicapi.tcs" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
22 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
23 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-bitmaputil-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-bitmaputil-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
24 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbsbitmap-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-fbsbitmap-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
25 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbscolor256bitmaputil-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-fbscolor256bitmaputil-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
26 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbsfont-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-fbsfont-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
27 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbssession-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-fbssession-publicapi.script" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
28 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbstypefacestore-publicapi.script", "temp/graphicssvs/graphics/general/graphics-fbserv-fbstypefacestore-publicapi.script" or die "failed : $!"; |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
29 |
|
797
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
30 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-bitmaputil-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-bitmaputil-publicapi.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
31 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbsbitmap-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-fbsbitmap-publicapi.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
32 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbscolor256bitmaputil-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-fbscolor256bitmaputil-publicapi.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
33 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbsfont-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-fbsfont-publicapi.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
34 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbssession-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-fbssession-publicapi.ini" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
35 |
copy $epoc . "release/winscw/udeb/z/graphics/graphics-fbserv-fbstypefacestore-publicapi.ini", "temp/graphicssvs/graphics/general/graphics-fbserv-fbstypefacestore-publicapi.ini" or die "failed : $!"; |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
36 |
|
797
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
37 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/empty_file.txt", "temp/graphicssvs/graphics/t_fbservapi/general/empty_file.txt" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
38 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/scaniline_10bytes.txt", "temp/graphicssvs/graphics/t_fbservapi/general/scaniline_10bytes.txt" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
39 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/testfontfb.gdr", "temp/graphicssvs/graphics/t_fbservapi/general/testfontfb.gdr" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
40 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/test_bitmap.mbm", "temp/graphicssvs/graphics/t_fbservapi/general/test_bitmap.mbm" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
41 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/test_bitmap_24bit_400x300.mbm", "temp/graphicssvs/graphics/t_fbservapi/general/test_bitmap_24bit_400x300.mbm" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
42 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/test_bitmap_32x8.mbm", "temp/graphicssvs/graphics/t_fbservapi/general/test_bitmap_32x8.mbm" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
43 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/test_bitmap_offset8.mbm", "temp/graphicssvs/graphics/t_fbservapi/general/test_bitmap_offset8.mbm" or die "failed : $!"; |
cbc760a5fedd
Fixed perl scripts for building BC test drops
Maciej Seroka <maciejs@symbian.org>
parents:
631
diff
changeset
|
44 |
copy $epoc . "release/winscw/udeb/z/graphics/t_fbservapi/test_bitmap_rom.rbm", "temp/graphicssvs/graphics/t_fbservapi/general/test_bitmap_rom.rbm" or die "failed : $!"; |
293
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
45 |
|
737aeceb580d
Created Graphics Perl script to create package and finished adding to test XML
Brendan Donegan brendand@symbian.org
parents:
diff
changeset
|
46 |
system("7z a -tzip graphicssvs.zip ./temp/*"); |