diff -r 15428d415dba -r 20205e7ab525 generate_package_defs.pl --- a/generate_package_defs.pl Wed May 26 12:52:49 2010 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,71 +0,0 @@ -use strict; - -my $SYSDEFTOOLS_PATH = "packages\\sysdeftools"; -my $XALAN_J = "java -jar $SYSDEFTOOLS_PATH\\xalan.jar"; -my $XALAN_C = "packages\\sysmodelgen\\rsc\\installed\\Xalan\\Xalan.exe"; - -system("rmdir /S /Q tmp") if (-d "tmp"); -mkdir("tmp"); -chdir("tmp"); - -print "\n\n### CLONE MCL/sftools/fbf/projects/packages REPO ###\n"; -system("hg clone -r default http://developer.symbian.org/oss/MCL/sftools/fbf/projects/packages"); -my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time); -my $timestamp = sprintf "%4d%02d%02d%02d%02d%02d",$year+1900,$mon+1,$mday,$hour,$min,$sec; -#print "\n\n### CLONE MCL/sf/os/buildtools REPO ###\n"; -#system("hg clone -r RCL_3 http://developer.symbian.org/oss/MCL/sf/os/buildtools"); -print "\n\n### CLONE MCL/sftools/fbf/projects/platforms REPO ###\n"; -system("hg clone -r default http://developer.symbian.org/oss/MCL/sftools/fbf/projects/platforms"); - -# get the codelines from the packages repo -opendir(DIR, "packages"); -my @codelines = grep(($_ !~ /^\.\.?$/ and $_ =~ /^symbian/), readdir(DIR)); -close(DIR); - -# get the changeset from the platform repo -my $platform_changeset = `hg -R platforms identify -i`; -chomp $platform_changeset; -print "-->$platform_changeset<--\n"; - -# loop over codelines -for my $codeline (@codelines) -{ - mkdir($codeline); - - # Split model into package models - print "\n\n### SPLIT MODEL INTO PACKAGE MODELS ###\n"; - my $updatedefault_cmd = "hg -R packages update -r default"; - print "$updatedefault_cmd\n"; - system($updatedefault_cmd); - my $rmdir_cmd = "del /S packages\\$codeline\\package_definition.xml >nul"; - print "$rmdir_cmd\n"; - system($rmdir_cmd); - my $splitmodel_cmd = "perl ..\\split_sysdef.pl -s platforms\\$codeline\\single\\sysdefs\\system_model.xml -o packages\\$codeline"; - print "$splitmodel_cmd\n"; - system($splitmodel_cmd); - if ($codeline eq 'symbian3') # also update CompilerCompatibility - { - my $rmdir2_cmd = "del /S packages\\CompilerCompatibility\\package_definition.xml >nul"; - print "$rmdir2_cmd\n"; - system($rmdir2_cmd); - my $splitmodel2_cmd = "perl ..\\split_sysdef.pl -s platforms\\$codeline\\single\\sysdefs\\system_model.xml -o packages\\CompilerCompatibility"; - print "$splitmodel2_cmd\n"; - system($splitmodel2_cmd); - } - my $addremove_cmd = "hg -R packages addremove"; - print "$addremove_cmd\n"; - system($addremove_cmd); - my $diff_cmd = "hg -R packages diff --stat"; - print "$diff_cmd\n"; - my @diff_output = `$diff_cmd`; - if (@diff_output) - { - my $commit_cmd = "hg -R packages commit -m \"Update package models from latest system model (platform\@$platform_changeset)\" -u\"Dario Sestito \""; - print "$commit_cmd\n"; - system($commit_cmd); - my $push_cmd = "hg -R packages push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/packages"; - print "$push_cmd\n"; - system($push_cmd); - } -} -