browserui/browser/IadSis/createIADpackages.pl
branchRCL_3
changeset 55 08ffbd51e3fd
parent 52 25214794fad6
child 56 3154c14a33db
equal deleted inserted replaced
52:25214794fad6 55:08ffbd51e3fd
     1 #!perl
       
     2 # ============================================================================
       
     3 # Name: createIADPackages.pl 
       
     4 #
       
     5 # Description: This script generate various SIS package files depeding on the 
       
     6 #							 depending on the variant selection. for example variant 01 will create
       
     7 #							 a package support English, French, Germany and Portuguese. 
       
     8 # 
       
     9 # Example for using this script: 
       
    10 # perl %name create_package.pl -v 15 -p armv5 -r urel -bmajor 7 -bminor 1 -bnumber 32 
       
    11 #
       
    12 # Copyright © 2008 Nokia.  All rights reserved.
       
    13 # This material, including documentation and any related computer
       
    14 # programs, is protected by copyright controlled by Nokia.  All
       
    15 # rights are reserved.  Copying, including reproducing, storing,
       
    16 # adapting or translating, any or all of this material requires the
       
    17 # prior written consent of Nokia.  This material also contains
       
    18 # confidential information which may not be disclosed to others
       
    19 # without the prior written consent of Nokia.
       
    20 # ============================================================================
       
    21 #
       
    22 # TODOs
       
    23 #			If possible, make all the components configurable 
       
    24 #			Support 5.0 and onward
       
    25 # Notes: 
       
    26 # 		Currently only armv5 is supported, winscw is not supported
       
    27 #			Currently only urel is supported. udeb is not supported 
       
    28 #			Currently variant support only CCB on 323
       
    29 #
       
    30 use Getopt::Long;
       
    31 use File::Copy;
       
    32 use File::Basename;
       
    33 use strict;
       
    34 use warnings;
       
    35 use Cwd;
       
    36 use FindBin qw($Bin);
       
    37 use Data::Dumper;
       
    38 use fcntl; 
       
    39 
       
    40 my $usage = q{
       
    41 Description: This script generate browser sisx package file automatically. 
       
    42 This script usually is called by buildIADsis.pl. However it can be used separately as well. 
       
    43 	
       
    44 Example: create_package.pl -s S60.323 -v 01 -p armv5 -r urel -bmajor 7 -bminor 1 -bnumber 32  
       
    45 
       
    46 Mandatory arguments: 
       
    47 -s: S60 platform. Value such as S60.323 or  S60.50
       
    48 -v: S60 language variant number
       
    49 -p: Build target platform. Valid values are: armv5 or winscw, only armv5 supported right now
       
    50 -r: Release build. Valid values are: urel or udeb, only urel supported right now 
       
    51 -bmajor: build major number. In term of Browser version 7.1.1234, 7 is the major number 
       
    52 -bminor: build minor number. In term of Browser version 7.1.1234, 1 is the minor number 
       
    53 -bnumber: build number. In term of Browser version 7.1.1234, 1234 is the build number  
       
    54 
       
    55 Optional arguments: 
       
    56 - None
       
    57 
       
    58 Limitations
       
    59 - This script only support armv5 urel currently
       
    60 - This script is valid for CCB on 323 build currently 
       
    61 }; 
       
    62 
       
    63 my %num_lang = (
       
    64 	"01"	=> ["western", "01", "02", "03", "14"],
       
    65 	"02"	=> ["western", "01", "09", "06", "16"],
       
    66 	"03"	=> ["western", "01", "37", "57", "50"],
       
    67 	"04"	=> ["western", "01", "05", "27", "17"],
       
    68 	"05"	=> ["western", "01", "04", "18", "13"],
       
    69 	"06"	=> ["western", "01", "51", "76", "83"],
       
    70 	"07"	=> ["western", "01", "67", "54", "49"],
       
    71 	"08"	=> ["western", "01", "68", "78", "93"],
       
    72 	"09"	=> ["western", "01", "42", "45", "79"],
       
    73 	"10"	=> ["western", "01", "59", "70", "39"],
       
    74 	"11"	=> ["western", "01", "15", "07", "08"],
       
    75 	"12"	=> ["western", "01", "58", "94"],
       
    76 	"13"	=> ["western", "01", "25", "26", "28"],
       
    77 	"14"	=> ["china", "29", "30", "157"],
       
    78 	"15"	=> ["china", "31", "159"],
       
    79 	"16"	=> ["japan", "32", "160"],
       
    80 	"17"	=> ["thai", "33", "161"],
       
    81 	"18"  => ["western", "01", "96"],
       
    82 	"19"  => ["china", "31", "326", "159"],
       
    83 	"20"  => ["western", "05", "44", "401", "402"],
       
    84 	"50" => ["western", "01", "02", "03", "14", "09", "06", "16", "37", "57", "33", "50", "05", "27", 
       
    85 											"17", "04", "18", "13", "51", "76", "83", "67", "54", "49", "68", "78", "93", 
       
    86 											"42", "45", "79", "59", "70", "39", "15", "07", "08", "58", "94", "25", "26", "28", 
       
    87 											"96", "05", "44"],
       
    88 	"51" => ["china", "29", "30", "157", "31", "159"]
       
    89 	);	
       
    90 # To support western-all IAD delivery we need to remove Lang 401, 402 of variant 50
       
    91 
       
    92 die $usage unless @ARGV;
       
    93 
       
    94 print @ARGV; 
       
    95 print "\n"; 
       
    96 
       
    97 my ($s60,$variant_num,$platform,$release,$bmajor,$bminor,$bnumber,$udeburel); 
       
    98 $s60 = "S60.323"; # Initialize the default value
       
    99 $udeburel = "urel";
       
   100 #my ($test1, $test2, $test3); 
       
   101 GetOptions("s=s", => \$s60, "v=s", => \$variant_num, "p=s",=> \$platform, "r=s",=> \$release,
       
   102            "bmajor=s", => \$bmajor, "bminor=s",=> \$bminor, "bnumber=s",=> \$bnumber, 
       
   103            "build=s", => \$udeburel) or die $usage; 
       
   104 print "variant $variant_num \n";
       
   105 print "s60platform $s60 \n"; 
       
   106 print "release $release \n";
       
   107 print "bmajor, $bmajor \n"; 
       
   108 print "bminor, $bminor \n"; 
       
   109 print "bnumber, $bnumber \n"; 
       
   110 print "build $udeburel \n"; 
       
   111  
       
   112 print "... package variant $variant_num\n";
       
   113 print "... package platform $platform \n";
       
   114 print "... release $release \n";
       
   115 # print "... major mini build $bmajor $bminor $bnumber \n"); 
       
   116 # exit; 
       
   117 
       
   118 # print $release; print "\n"; 
       
   119 
       
   120 
       
   121 # Create BrowserNG_Cenrep.pkg file 
       
   122 open (CENPKGFILE, '>.\\pkg\\BrowserNG_cenrep.pkg');
       
   123 print CENPKGFILE "\;Languages\n"; 
       
   124 print CENPKGFILE "\&EN\n\n"; 
       
   125 print CENPKGFILE "\;Header\n";
       
   126 print CENPKGFILE "\#\{\"Browser CenRep INI file\"\}\, \(0x10202BE9\)\,$bmajor,$bminor,$bnumber, TYPE=SP \n\n";
       
   127 print CENPKGFILE <<ENDHEADER0;
       
   128 ;Localised Vendor name
       
   129 %{"Nokia"}
       
   130 
       
   131 ;Unique Vendor name
       
   132 :"Nokia"
       
   133 
       
   134 ;Supports S60 3rd Edition
       
   135 ENDHEADER0
       
   136 # consider the platform support
       
   137 # [0x102032BE], 0, 0, 0, {"Series60ProductID"}
       
   138 # [0x1028315F], 0, 0, 0, {"Series60ProductID"}
       
   139 # if ( $s60platform eq "S60.50" ) 
       
   140 if ( $s60 eq "S60.323" ) 
       
   141 {
       
   142     print CENPKGFILE "[0x102032BE], 0, 0, 0, \{\"Series60ProductID\"\} \n\n";
       
   143 }    
       
   144 if ( $s60 eq "S60.50" ) 
       
   145 {
       
   146     print CENPKGFILE "[0x1028315F], 0, 0, 0, \{\"Series60ProductID\"\} \n\n";
       
   147 }    
       
   148 
       
   149 print CENPKGFILE "\; CenRep ini file\n";
       
   150 my $SrcDir = "\\epoc32\\data\\z\\private\\10202be9\\";
       
   151 my $TargetDir = "c:\\private\\10202be9\\"; 
       
   152 print CENPKGFILE "\n";
       
   153 my @install_files = (
       
   154 	"10008d39.txt",
       
   155 	"101f8731.txt"
       
   156 );
       
   157 for my$install_file (@install_files) {
       
   158 print CENPKGFILE "\"$SrcDir$install_file\"\n - \"$TargetDir$install_file\" \n"; 
       
   159 }
       
   160 close (CENPKGFILE); 
       
   161 
       
   162 ########################################################################
       
   163 # create BrowserNG.pkg file
       
   164 open (PKGFILE, '>.\\pkg\\BrowserNG.pkg');
       
   165 #print PKGFILE <<ENDHEADER;
       
   166 #;Languages
       
   167 print PKGFILE "\;Languages\n"; 
       
   168 #&EN
       
   169 print PKGFILE "\&EN\n\n"; 
       
   170 #
       
   171 #;Header
       
   172 #{"Web Browser Update"},(0x10008D39),7,1,0, TYPE=SA,RU
       
   173 print PKGFILE "\;Header\n";
       
   174 print PKGFILE "\#\{\"Web Browser Update\"\}\, \(0x10008D39\)\,$bmajor,$bminor,$bnumber, TYPE=SA,RU \n\n";
       
   175 
       
   176 print PKGFILE <<ENDHEADER;
       
   177 ;Localised Vendor name
       
   178 %{"Nokia"}
       
   179 
       
   180 ;Unique Vendor name
       
   181 :"Nokia"
       
   182 
       
   183 ;Supports S60 3rd Edition
       
   184 ENDHEADER
       
   185 #[0x102032BE], 0, 0, 0, {"Series60ProductID"}
       
   186 #[0x1028315F], 0, 0, 0, {"Series60ProductID"}
       
   187 if ( $s60 eq "S60.323" ) 
       
   188 {
       
   189     print PKGFILE "[0x102032BE], 0, 0, 0, \{\"Series60ProductID\"\} \n\n";
       
   190 }    
       
   191 if ( $s60 eq "S60.50" ) 
       
   192 {
       
   193     print PKGFILE "[0x1028315F], 0, 0, 0, \{\"Series60ProductID\"\} \n\n";
       
   194 }
       
   195 
       
   196 # MIF resource files ot install
       
   197 $SrcDir = "\\epoc32\\data\\Z\\resource\\apps\\";
       
   198 $TargetDir = "!:\\resource\\apps\\"; 
       
   199 print PKGFILE "\n";
       
   200 # print PKGFILE $SrcDir; 
       
   201 # print PKGFILE $TargetDir; 
       
   202 @install_files = (
       
   203 	"BrowserAudioVideoPlugin_aif.mif",
       
   204 	"schemeapp_aif.mif",
       
   205 	"VideoServices_AIF.MIF", 
       
   206 	"browser.mif", 
       
   207 	"browserng_aif.mif",
       
   208 	"connman.mif", 
       
   209 	"downloadmgruilib.mif",
       
   210 	"operatormenu_aif.mif",
       
   211 	"pushmtm.mif",
       
   212 	"webkiticons.mif", 
       
   213 	"webkitutilsicons.mif" 
       
   214 );
       
   215 for my $install_file (@install_files) {
       
   216 print PKGFILE "\"$SrcDir$install_file\"\n - \"$TargetDir$install_file\" \n"; 
       
   217 }
       
   218 
       
   219 # SRC resource files ot install
       
   220 $SrcDir = "\\epoc32\\data\\z\\private\\10003a3f\\apps\\";
       
   221 $TargetDir = "!:\\private\\10003a3f\\import\\apps\\"; 
       
   222 print PKGFILE "\n";
       
   223 @install_files = (
       
   224 	"BrowserNG_reg.rsc",
       
   225 	"CodViewer_reg.rsc",
       
   226 	"DdViewer_reg.rsc", 
       
   227 	"Operatormenu_reg.rsc", 
       
   228 	"PushViewer_reg.rsc",
       
   229 	"RoapApp_reg.rsc", 
       
   230 	"SchemeApp_reg.rsc",
       
   231 	"VideoServices_reg.rsc",
       
   232 	"WidgetUi_reg.rsc"
       
   233 );
       
   234 for my$install_file (@install_files) {
       
   235 print PKGFILE "\"$SrcDir$install_file\"\n - \"$TargetDir$install_file\" \n"; 
       
   236 }
       
   237 
       
   238 # SRC resource files ot install
       
   239 $SrcDir = "\\epoc32\\data\\Z\\resource\\";
       
   240 $TargetDir = "!:\\resource\\"; 
       
   241 print PKGFILE "\n";
       
   242 @install_files = (
       
   243 	"AiwBrowserProvider.rsc"
       
   244 );
       
   245 for my $install_file (@install_files) {
       
   246 print PKGFILE "\"$SrcDir$install_file\"\n - \"$TargetDir$install_file\" \n\n"; 
       
   247 }
       
   248 
       
   249 # Get the languages of the variant 
       
   250 my $variant_lang = $num_lang{$variant_num}; 
       
   251 my @variant_lang = @$variant_lang; 
       
   252 shift @variant_lang; 
       
   253 
       
   254 # generate the lang dependent files 
       
   255 for my$lang (@variant_lang) {
       
   256   print PKGFILE "IF exists\( \"z:\\resource\\avkon.r$lang\" ) \n";	
       
   257 
       
   258 	$SrcDir = "\\epoc32\\data\\z\\resource\\";
       
   259 	$TargetDir = "!:\\resource\\"; 
       
   260 	print PKGFILE "\n";
       
   261 	@install_files = (
       
   262 		"webkit",
       
   263 		"BrowserAudioVideoPlugin",
       
   264 		"BrowserDialogsProvider", 
       
   265 		"browsertelservice", 
       
   266 		"CodUi",
       
   267 		"ConnectionManager", 
       
   268 		"DownloadMgrUiLib",
       
   269 		"WidgetInstallerUI",
       
   270 		"WidgetMenu"
       
   271 	);
       
   272 	for my$install_file (@install_files) {
       
   273 	print PKGFILE "\"$SrcDir$install_file.r$lang\"\n - \"$TargetDir$install_file.r$lang\" \n"; 
       
   274 	}
       
   275 	# generate more lang dependent files 
       
   276 	$SrcDir = "\\epoc32\\data\\z\\resource\\";
       
   277 	$TargetDir = "!:\\resource\\"; 
       
   278 	print PKGFILE "\n";
       
   279 	@install_files = (
       
   280 		"webkitutils"
       
   281 	);
       
   282 	for my$install_file (@install_files) {
       
   283 	print PKGFILE "\"$SrcDir$install_file.r$lang\"\n - \"$TargetDir$install_file.r$lang\" \n"; 	
       
   284 	}
       
   285 	# generate more lang dependent files 
       
   286 	$SrcDir = "\\epoc32\\data\\z\\resource\\apps\\";
       
   287 	$TargetDir = "!:\\resource\\apps\\"; 
       
   288 	print PKGFILE "\n";
       
   289 	@install_files = (
       
   290 		"BrowserNG",
       
   291 		"CodViewer",
       
   292 		"DdViewer",
       
   293 		"Operatormenu",
       
   294 		"PushViewer",
       
   295 		"RoapApp",
       
   296 		"SchemeApp",
       
   297 		"VideoServices",
       
   298 		"WidgetUi"
       
   299 	);
       
   300 	for my$install_file (@install_files) {
       
   301 	print PKGFILE "\"$SrcDir$install_file.r$lang\"\n - \"$TargetDir$install_file.r$lang\" \n"; 
       
   302 	}
       
   303 	# generate more lang dependent files 
       
   304 	$SrcDir = "\\epoc32\\data\\z\\resource\\messaging\\mtm\\";
       
   305 	$TargetDir = "!:\\resource\\messaging\\mtm\\"; 
       
   306 	print PKGFILE "\n";
       
   307 	@install_files = (
       
   308 		"PushRegistry"
       
   309 	);
       
   310 	for my$install_file (@install_files) {
       
   311 	print PKGFILE "\"$SrcDir$install_file.r$lang\"\n - \"$TargetDir$install_file.r$lang\" \n"; 
       
   312 	}
       
   313 	# generate more lang dependent files 
       
   314 	$SrcDir = "\\epoc32\\data\\z\\resource\\messaging\\";
       
   315 	$TargetDir = "!:\\resource\\messaging\\"; 
       
   316 	print PKGFILE "\n";
       
   317 	@install_files = (
       
   318 		"PushMtmUi"
       
   319 	);
       
   320 	for my$install_file (@install_files) {
       
   321 	print PKGFILE "\"$SrcDir$install_file.r$lang\"\n - \"$TargetDir$install_file.r$lang\" \n"; 
       
   322 	}
       
   323 print PKGFILE "ENDIF \n";
       
   324 }
       
   325 # end of generate the lang dependent files 
       
   326 
       
   327 # Non lang dependent rsc files 
       
   328 $SrcDir = "\\epoc32\\data\\z\\resource\\plugins\\";
       
   329 $TargetDir = "!:\\resource\\plugins\\"; 
       
   330 print PKGFILE "\n";
       
   331 if ( $s60 eq "S60.323" ) 
       
   332 {
       
   333 @install_files = (
       
   334 	"AiwBrowserProvider",
       
   335 	"BrowserRec",
       
   336 	"CodRecog",
       
   337 	"CookieFilter",
       
   338 	"DdRecog",
       
   339 	"DeflateFilter",
       
   340 	"HttpFilterAcceptHeader",
       
   341 	"HttpFilterAuthentication",
       
   342 	"PushMtmPushContentHandler",
       
   343 	"PushMtmWhiteListAdapter",
       
   344 	"SchemeDispatcher",
       
   345 	"WidgetInstallerUI", 
       
   346 	"widgetRecognizer",
       
   347 	"httpfilterIop",
       
   348 	"httpfilterconnhandler",
       
   349 	"httpfilterproxy",
       
   350 	"memoryplugin",
       
   351 	"npBrowserAudioVideoPlugin",
       
   352 	"npGpsPlugin",
       
   353 	"npSystemInfoPlugin", 
       
   354 	"uaproffilter",
       
   355 	"widgetmemoryplugin"	
       
   356   );
       
   357 }
       
   358 # Note: Some way of figuring out what need to be on the packages and 
       
   359 #       hope we will be able to develp an algorithms for it 
       
   360 # 1. The components change you're aware of. For example gesture lib addition to browser
       
   361 # 2. Build system, you can find out what's are builded from the build system
       
   362 # 3. Search for iby files
       
   363 if ( $s60 eq "S60.50" ) 
       
   364 {
       
   365 @install_files = (
       
   366 	"AiwBrowserProvider",
       
   367 	"BrowserRec",
       
   368 	"CodRecog",
       
   369 	"CookieFilter",
       
   370 	"DdRecog",
       
   371 	"DeflateFilter",
       
   372 	"HttpFilterAcceptHeader",
       
   373 	"HttpFilterAuthentication",
       
   374 	"PushMtmPushContentHandler",
       
   375 	"PushMtmWhiteListAdapter",
       
   376 	"SchemeDispatcher",
       
   377 	"WidgetInstallerUI", 
       
   378 	"widgetRecognizer",
       
   379 	"httpfilterIop",
       
   380 	"httpfilterconnhandler",
       
   381 	"httpfilterproxy",
       
   382 	"memoryplugin",
       
   383 	"npBrowserAudioVideoPlugin",
       
   384 	"npGpsPlugin",
       
   385 	"npSystemInfoPlugin", 
       
   386 	"uaproffilter",
       
   387 	"widgetmemoryplugin"
       
   388   );
       
   389 }
       
   390 print PKGFILE "\n";
       
   391 for my$install_file (@install_files) {
       
   392 print PKGFILE "\"$SrcDir$install_file.rsc\"\n - \"$TargetDir$install_file.rsc\" \n"; 
       
   393 }
       
   394 
       
   395 # Files to install (binaries - DLL)
       
   396 $SrcDir = "\\epoc32\\release\\armv5\\" . $udeburel . "\\";
       
   397 $TargetDir = "!:\\sys\\bin\\"; 
       
   398 print PKGFILE "\n";
       
   399 
       
   400 if ( $s60 eq "S60.323" ) 
       
   401 {
       
   402 @install_files = (
       
   403 	"AiwBrowserProvider",
       
   404 	"BrowserCache",
       
   405 	"BrowserLauncher",
       
   406 	"BrowserRec",
       
   407 	"BrowserTelService",
       
   408 	"CodDownload",
       
   409 	"CodEng",
       
   410 	"CodRecog",
       
   411 	"CodUi",
       
   412 	"ConnectionManager",
       
   413 	"DdRecog",
       
   414 	"DeflateFilter",
       
   415 	"DownloadMgr",
       
   416 	"DownloadMgrUiLib", 
       
   417 	"FavouritesEngine",
       
   418 	"FeedsServerApi",
       
   419 	"FeedsServerClient",
       
   420 	"HttpDMServEng",
       
   421 	"HttpFilterAcceptHeader",
       
   422 	"HttpFilterAuthentication",
       
   423 	"HttpFilterCommon", 
       
   424 	"JavaScriptCore",
       
   425 	"MemMan",
       
   426 	"Multipartparser",
       
   427 	"PushMtmCliSrv",
       
   428 	"PushMtmPushContentHandler",
       
   429 	"PushMtmUi",
       
   430 	"PushMtmUtil",
       
   431 	"PushMtmWhiteListAdapter",
       
   432 	"RECENTURLSTORE",
       
   433 	"SchemeDispatcher",
       
   434 	"WidgetInstallerUI",
       
   435 	"WidgetRecognizer",
       
   436 	"WidgetRegistryClient",
       
   437 	"browserdialogsprovider",
       
   438 	"browserengine",
       
   439 	"cXmlParser",
       
   440 	"cookiefilter",
       
   441 	"cookiemanager",
       
   442 	"httpfilterIop",
       
   443 	"httpfilterconnhandler",
       
   444 	"httpfilterproxy",
       
   445 	"memoryplugin",
       
   446 	"npBrowserAudioVideoPlugin",
       
   447 	"npGpsPlugin",
       
   448 	"npSystemInfoPlugin",
       
   449 	"pagescaler",
       
   450 	"uaproffilter",
       
   451 	"webkitutils",
       
   452 	"webutils",
       
   453 	"widgetengine",
       
   454 	"WidgetInstaller",
       
   455 	"widgetmemoryplugin",
       
   456 	"wmlEngine",
       
   457 	"jsdevice",
       
   458 );	
       
   459 }
       
   460 if ( $s60 eq "S60.50" ) 
       
   461 {
       
   462 @install_files = (
       
   463 	"AiwBrowserProvider",
       
   464 	"BrowserCache",
       
   465 	"BrowserLauncher",
       
   466 	"BrowserRec",
       
   467 	"BrowserTelService",
       
   468 	"CodDownload",
       
   469 	"CodEng",
       
   470 	"CodRecog",
       
   471 	"CodUi",
       
   472 	"ConnectionManager",
       
   473 	"DdRecog",
       
   474 	"DeflateFilter",
       
   475 	"DownloadMgr",
       
   476 	"DownloadMgrUiLib", 
       
   477 	"FavouritesEngine",
       
   478 	"FeedsServerApi",
       
   479 	"FeedsServerClient",
       
   480 	"HttpDMServEng",
       
   481 	"HttpFilterAcceptHeader",
       
   482 	"HttpFilterAuthentication",
       
   483 	"HttpFilterCommon", 
       
   484 	"JavaScriptCore",
       
   485 	"MemMan",
       
   486 	"Multipartparser",
       
   487 	"PushMtmCliSrv",
       
   488 	"PushMtmPushContentHandler",
       
   489 	"PushMtmUi",
       
   490 	"PushMtmUtil",
       
   491 	"PushMtmWhiteListAdapter",
       
   492 	"RECENTURLSTORE",
       
   493 	"SchemeDispatcher",
       
   494 	"WidgetInstallerUI",
       
   495 	"WidgetRecognizer",
       
   496 	"WidgetRegistryClient",
       
   497 	"browserdialogsprovider",
       
   498 	"browserengine",
       
   499 	"cXmlParser",
       
   500 	"cookiefilter",
       
   501 	"cookiemanager",
       
   502 	"httpfilterIop",
       
   503 	"httpfilterconnhandler",
       
   504 	"httpfilterproxy",
       
   505 	"memoryplugin",
       
   506 	"npBrowserAudioVideoPlugin",
       
   507 	"npGpsPlugin",
       
   508 	"npSystemInfoPlugin",
       
   509 	"pagescaler",
       
   510 	"uaproffilter",
       
   511 	"webkitutils",
       
   512 	"webutils",
       
   513 	"widgetengine",
       
   514 	"WidgetInstaller",
       
   515 	"widgetmemoryplugin",
       
   516 	"wmlEngine",
       
   517 	"stmgesturefw",
       
   518 	"jsdevice",
       
   519   );		
       
   520 }
       
   521 for my$install_file (@install_files) {
       
   522 print PKGFILE "\"$SrcDir$install_file.dll\"\n - \"$TargetDir$install_file.dll\" \n"; 
       
   523 }
       
   524 
       
   525 # Files to install (binaries - EXE)
       
   526 $SrcDir = "\\epoc32\\release\\armv5\\" . $udeburel . "\\";
       
   527 $TargetDir = "!:\\sys\\bin\\"; 
       
   528 print PKGFILE "\n";
       
   529 @install_files = (
       
   530 	"BrowserNG",
       
   531 	"CodViewer",
       
   532 	"CookieServer",
       
   533 	"DdViewer",
       
   534 	"DownloadMgrServer",
       
   535 	"FavouritesSrv",
       
   536 	"FeedsServer",
       
   537 	"OperatorMenu",
       
   538 	"PushViewer",
       
   539 	"RoapApp",
       
   540 	"SchemeApp",
       
   541 	"VideoServices",
       
   542 	"WidgetBackupRestore",
       
   543 	"widgetlauncher", 
       
   544 	"WidgetRegistry",
       
   545 	"WidgetUi"
       
   546 );	
       
   547 for my$install_file (@install_files) {
       
   548 print PKGFILE "\"$SrcDir$install_file.exe\"\n - \"$TargetDir$install_file.exe\" \n"; 
       
   549 }
       
   550 
       
   551 # add the cenrep file 
       
   552 print PKGFILE "\n\n";
       
   553 print PKGFILE "\@\"BrowserNG_Cenrep.sisx\", (0x10202BE9)\n"; 
       
   554 
       
   555 close (PKGFILE); 
       
   556 
       
   557 print "end of the package"