63 |
63 |
64 print "\n\n### PUSH TO PLATFORMS REPOSITORY (auto) ###\n"; |
64 print "\n\n### PUSH TO PLATFORMS REPOSITORY (auto) ###\n"; |
65 mkdir("platforms\\$codeline") if (!-d "platforms\\$codeline"); |
65 mkdir("platforms\\$codeline") if (!-d "platforms\\$codeline"); |
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 mkdir("platforms\\$codeline\\single\\sysdefs\\auto") if (!-d "platforms\\$codeline\\single\\sysdefs\\auto"); |
|
69 my $updatesysdef_cmd = "copy /Y $codeline\\system_model.xml platforms\\$codeline\\single\\sysdefs\\auto\\system_model.xml"; |
69 print "$updatesysdef_cmd\n"; |
70 print "$updatesysdef_cmd\n"; |
70 system($updatesysdef_cmd); |
71 system($updatesysdef_cmd); |
71 system("hg -R platforms add"); # just in case this is a new platform |
72 system("hg -R platforms add"); # just in case this is a new platform |
72 my $diff_cmd = "hg -R platforms diff --stat"; |
73 my $diff_cmd = "hg -R platforms diff --stat"; |
73 print "$diff_cmd\n"; |
74 print "$diff_cmd\n"; |
74 my @diff_output = `$diff_cmd`; |
75 my @diff_output = `$diff_cmd`; |
75 if (@diff_output) |
76 if (@diff_output) |
76 { |
77 { |
|
78 system("hg -R platforms add"); |
77 system("hg -R platforms commit -m \"Add auto generated $codeline system model (packages\@$packages_changeset)\" -u\"Dario Sestito <darios\@symbian.org>\""); |
79 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"); |
80 system("hg -R platforms push http://darios:symbian696b\@developer.symbian.org/oss/MCL/sftools/fbf/projects/platforms"); |
79 |
81 |
80 # Split model into package models |
82 # Split model into package models |
81 print "\n\n### SPLIT MODEL INTO PACKAGE MODELS ###\n"; |
83 print "\n\n### SPLIT MODEL INTO PACKAGE MODELS ###\n"; |