equal
deleted
inserted
replaced
210 } |
210 } |
211 |
211 |
212 $zDrive = $release . $cedPlatfrom . '/' . $cedVariant . '/z'; |
212 $zDrive = $release . $cedPlatfrom . '/' . $cedVariant . '/z'; |
213 $zDriveCre = $zDrive . $cccccc00Root . $cccccc00NameCre; |
213 $zDriveCre = $zDrive . $cccccc00Root . $cccccc00NameCre; |
214 $CdbEmpty = $zDrive . $cccccc00Root . $cccccc00Nametxt; |
214 $CdbEmpty = $zDrive . $cccccc00Root . $cccccc00Nametxt; |
|
215 $romCdb = $epocRoot . 'epoc32/' . 'data/z' . $cccccc00Root . $cccccc00NameCre; |
215 |
216 |
216 if ($::command eq 'build') |
217 if ($::command eq 'build') |
217 { |
218 { |
218 $ced = $release . $cedPlatfrom . '/' . $cedVariant . '/ced.exe'; |
219 $ced = $release . $cedPlatfrom . '/' . $cedVariant . '/ced.exe'; |
219 $emulatorstore = $epocRoot . 'epoc32/' . $cedPlatfrom . $cdbIn; |
220 $emulatorstore = $epocRoot . 'epoc32/' . $cedPlatfrom . $cdbIn; |
220 $winsCdb = $epocRoot . 'epoc32/' . $cedPlatfrom . '/c' . $cccccc00Root . "persists/" . $cccccc00NameCre; |
221 $winsCdb = $epocRoot . 'epoc32/' . $cedPlatfrom . '/c' . $cccccc00Root . "persists/" . $cccccc00NameCre; |
221 $romCdb = $epocRoot . 'epoc32/' . 'data/z' . $cccccc00Root . $cccccc00NameCre; |
|
222 |
222 |
223 if ($platType =~ 'emulator') |
223 if ($platType =~ 'emulator') |
224 { |
224 { |
225 $CopiedCfg = $emulatorstore . 'emulator.cfg'; |
225 $CopiedCfg = $emulatorstore . 'emulator.cfg'; |
226 } |
226 } |
315 print("\n"); |
315 print("\n"); |
316 } |
316 } |
317 else |
317 else |
318 { |
318 { |
319 print("$data->{$platType}->{sourceCfg} older than $data->{$platType}->{destinationCdb}\n"); |
319 print("$data->{$platType}->{sourceCfg} older than $data->{$platType}->{destinationCdb}\n"); |
320 print("Construction aborted.\n"); |
320 print("Construction aborted. Copy-younger of resource CRE only\n"); |
|
321 #copy to z drive |
|
322 print("CopyIfYounger $winsCdb to $zDriveCre\n"); |
|
323 CopyIfYounger($winsCdb, $zDriveCre); |
321 } |
324 } |
322 } |
325 } |
323 else |
326 else |
324 { |
327 { |
325 print("CreateCommdbs Error: $data->{$platType}->{sourceCfg} does not exist, construction aborted.\n"); |
328 print("CreateCommdbs Error: $data->{$platType}->{sourceCfg} does not exist, construction aborted.\n"); |
345 |
348 |
346 sub Releasables |
349 sub Releasables |
347 { |
350 { |
348 print("$data->{$platType}->{destinationCdb}\n"); |
351 print("$data->{$platType}->{destinationCdb}\n"); |
349 print("$CdbEmpty\n"); |
352 print("$CdbEmpty\n"); |
|
353 if($::platform =~ /wins/i) |
|
354 { |
|
355 print("$zDriveCre \n"); |
|
356 } |
|
357 else |
|
358 { |
|
359 print("$romCdb\n"); |
|
360 } |
350 } |
361 } |
351 |
362 |
352 sub RunCed |
363 sub RunCed |
353 { |
364 { |
354 print("sub RunCed\n"); |
365 print("sub RunCed\n"); |