671
+ − 1
#!/usr/bin/perl
+ − 2
# Copyright (c) 2009 Symbian Foundation Ltd
+ − 3
# This component and the accompanying materials are made available
+ − 4
# under the terms of the License "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
# Symbian Foundation Ltd - initial contribution.
+ − 10
#
+ − 11
# Contributors:
+ − 12
# Maciej Seroka <maciejs@symbian.org>
+ − 13
#
+ − 14
# Description:
+ − 15
# Script to build ATS test drop for TLocale BC tests
+ − 16
+ − 17
+ − 18
use strict;
+ − 19
use File::Copy;
+ − 20
use File::Path;
+ − 21
+ − 22
unlink "tlocaletest.zip";
+ − 23
rmtree "temp";
+ − 24
mkpath "temp/tlocaletest/general/testframework";
+ − 25
mkpath "temp/tlocaletest/winscw_udeb";
+ − 26
+ − 27
my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
+ − 28
copy("tlocale.xml", "temp/test.xml");
+ − 29
+ − 30
copy($epoc . "release/winscw/udeb/tlocale.dll", "temp/tlocaletest/winscw_udeb/tlocale.dll") or die "failed : $!";
+ − 31
copy($epoc . "winscw/c/testframework/testframework_tlocale.ini", "temp/tlocaletest/general/testframework/testframework_tlocale.ini") or die "failed : $!";
+ − 32
copy($epoc . "winscw/c/testframework/tlocale.cfg", "temp/tlocaletest/general/testframework/tlocale.cfg") or die "failed : $!";
+ − 33
+ − 34
system("7z a -tzip tlocaletest.zip ./temp/*");