equal
deleted
inserted
replaced
20 |
20 |
21 my $sBOOTSTRAP_DIR="C:\\Apps\\FBF\\bootstrap"; |
21 my $sBOOTSTRAP_DIR="C:\\Apps\\FBF\\bootstrap"; |
22 my $sJOB_BASE_DIR="fbf_project"; |
22 my $sJOB_BASE_DIR="fbf_project"; |
23 my $nMAX_JOBDIR_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released |
23 my $nMAX_JOBDIR_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released |
24 my $nLOCK_FILE_MAX_ATTEMPTS = 5; |
24 my $nLOCK_FILE_MAX_ATTEMPTS = 5; |
25 my $sREMOTE_LOG_ARCHIVE="\\\\bishare\SF_builds"; |
25 my $sREMOTE_LOG_ARCHIVE="\\\\bishare\\SF_builds"; |
26 my $sNUMBERS_FILE="\\\\bishare\\SF_builds\\numbers2.txt"; |
26 my $sNUMBERS_FILE="\\\\bishare\\SF_builds\\numbers2.txt"; |
27 my $sLETTERS_FILE="letters.txt"; |
27 my $sLETTERS_FILE="letters.txt"; |
28 my $nMAX_LETTER_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released |
28 my $nMAX_LETTER_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released |
29 |
29 |
30 my $sFbfProjectRepo = "\\\\bishare\\mercurial_development\\oss\\FCL\\interim\\fbf\\projects\\packages"; |
30 my $sFbfProjectRepo = "\\\\bishare\\mercurial_development\\oss\\FCL\\interim\\fbf\\projects\\packages"; |
267 close(LOG); |
267 close(LOG); |
268 |
268 |
269 # copy console outputs to remote log archive |
269 # copy console outputs to remote log archive |
270 if (-d "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs") |
270 if (-d "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs") |
271 { |
271 { |
|
272 print "copying console output files to $sTgtDir\n"; |
272 my $sTgtDir = "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs\\console"; |
273 my $sTgtDir = "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs\\console"; |
273 system("mkdir $sTgtDir"); |
274 system("mkdir $sTgtDir"); |
274 system("copy /Y $sBOOTSTRAP_DIR\\console_bootstrap_$$.txt $sTgtDir"); |
275 system("copy /Y $sBOOTSTRAP_DIR\\console_bootstrap_$$.txt $sTgtDir"); |
275 system("del $sBOOTSTRAP_DIR\\console_bootstrap_$$.txt"); |
276 system("del $sBOOTSTRAP_DIR\\console_bootstrap_$$.txt"); |
276 system("copy $sJobDir\\sf-config\\console_sfprep_$$.txt $sTgtDir"); |
277 system("copy $sJobDir\\sf-config\\console_sfprep_$$.txt $sTgtDir"); |
277 system("copy $sJobDir\\sf-config\\console_sfbuildall_$$.txt $sTgtDir"); |
278 system("copy $sJobDir\\sf-config\\console_sfbuildall_$$.txt $sTgtDir"); |
|
279 } |
|
280 else |
|
281 { |
|
282 print "directory $sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs doesn't exist.\n"; |
278 } |
283 } |
279 |
284 |
280 print("cd $sBOOTSTRAP_DIR\n"); |
285 print("cd $sBOOTSTRAP_DIR\n"); |
281 chdir("$sBOOTSTRAP_DIR"); |
286 chdir("$sBOOTSTRAP_DIR"); |
282 |
287 |