66 mkdir("platforms\\$codeline\\single") if (!-d "platforms\\$codeline\\single"); |
66 mkdir("platforms\\$codeline\\single") if (!-d "platforms\\$codeline\\single"); |
67 mkdir("platforms\\$codeline\\single\\sysdefs") if (!-d "platforms\\$codeline\\single\\sysdefs"); |
67 mkdir("platforms\\$codeline\\single\\sysdefs") if (!-d "platforms\\$codeline\\single\\sysdefs"); |
68 my $updatesysdef_cmd = "copy /Y $codeline\\system_model.xml platforms\\$codeline\\single\\sysdefs\\system_model.xml"; |
68 my $updatesysdef_cmd = "copy /Y $codeline\\system_model.xml platforms\\$codeline\\single\\sysdefs\\system_model.xml"; |
69 print "$updatesysdef_cmd\n"; |
69 print "$updatesysdef_cmd\n"; |
70 system($updatesysdef_cmd); |
70 system($updatesysdef_cmd); |
|
71 system("hg -R platforms add"); # just in case this is a new platform |
71 my $diff_cmd = "hg -R platforms diff --stat"; |
72 my $diff_cmd = "hg -R platforms diff --stat"; |
72 print "$diff_cmd\n"; |
73 print "$diff_cmd\n"; |
73 my @diff_output = `$diff_cmd`; |
74 my @diff_output = `$diff_cmd`; |
74 if (@diff_output) |
75 if (@diff_output) |
75 { |
76 { |
76 system("hg -R platforms add"); # just in case this is a new platform |
|
77 system("hg -R platforms commit -m \"Add auto generated $codeline system model (packages\@$packages_changeset)\" -u\"Dario Sestito <darios\@symbian.org>\""); |
77 system("hg -R platforms commit -m \"Add auto generated $codeline system model (packages\@$packages_changeset)\" -u\"Dario Sestito <darios\@symbian.org>\""); |
78 system("hg -R platforms push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/platforms"); |
78 system("hg -R platforms push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/platforms"); |
79 |
79 |
80 # Split model into package models |
80 # Split model into package models |
81 print "\n\n### SPLIT MODEL INTO PACKAGE MODELS ###\n"; |
81 print "\n\n### SPLIT MODEL INTO PACKAGE MODELS ###\n"; |
95 system($rmdir2_cmd); |
95 system($rmdir2_cmd); |
96 my $splitmodel2_cmd = "perl ..\\split_sysdef.pl -s $codeline\\system_model.xml -o packages\\CompilerCompatibility"; |
96 my $splitmodel2_cmd = "perl ..\\split_sysdef.pl -s $codeline\\system_model.xml -o packages\\CompilerCompatibility"; |
97 print "$splitmodel2_cmd\n"; |
97 print "$splitmodel2_cmd\n"; |
98 system($splitmodel2_cmd); |
98 system($splitmodel2_cmd); |
99 } |
99 } |
|
100 my $addremove_cmd = "hg -R packages addremove"; |
|
101 print "$addremove_cmd\n"; |
|
102 system($addremove_cmd); |
100 my $diff_cmd = "hg -R packages diff --stat"; |
103 my $diff_cmd = "hg -R packages diff --stat"; |
101 print "$diff_cmd\n"; |
104 print "$diff_cmd\n"; |
102 my @diff_output = `$diff_cmd`; |
105 my @diff_output = `$diff_cmd`; |
103 if (@diff_output) |
106 if (@diff_output) |
104 { |
107 { |
105 my $addremove_cmd = "hg -R packages addremove"; |
|
106 print "$addremove_cmd\n"; |
|
107 system($addremove_cmd); |
|
108 my $commit_cmd = "hg -R packages commit -m \"Update package models from auto generated system model (packages\@$packages_changeset)\" -u\"Dario Sestito <darios\@symbian.org>\""; |
108 my $commit_cmd = "hg -R packages commit -m \"Update package models from auto generated system model (packages\@$packages_changeset)\" -u\"Dario Sestito <darios\@symbian.org>\""; |
109 print "$commit_cmd\n"; |
109 print "$commit_cmd\n"; |
110 system($commit_cmd); |
110 system($commit_cmd); |
111 my $push_cmd = "hg -R packages push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/packages"; |
111 my $push_cmd = "hg -R packages push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/packages"; |
112 print "$push_cmd\n"; |
112 print "$push_cmd\n"; |