Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

57 lines
1.2 KiB

  1. @echo off
  2. REM ------------------------------------------------------------------
  3. REM
  4. REM cd2.cmd
  5. REM make cmpnents cd
  6. REM
  7. REM Copyright (c) Microsoft Corporation. All rights reserved.
  8. REM
  9. REM ------------------------------------------------------------------
  10. if defined _CPCMAGIC goto CPCBegin
  11. perl -x "%~f0" %*
  12. goto :EOF
  13. #!perl
  14. use strict;
  15. use lib $ENV{RAZZLETOOLPATH} . "\\PostBuildScripts";
  16. use lib $ENV{RAZZLETOOLPATH};
  17. use PbuildEnv;
  18. use ParseArgs;
  19. sub Usage { print<<USAGE; exit(1) }
  20. moves cmpnents files to cmpnents directory under slp\\pro.
  21. -n:[Build Number]
  22. USAGE
  23. parseargs('?' => \&Usage,
  24. 'n:' => \$ENV{mybuildnum});
  25. # *** NEXT FEW LINES ARE TEMPLATE ***
  26. $ENV{"_CPCMAGIC"}++;exit(system($0)>>8);
  27. __END__
  28. :CPCBegin
  29. set _CPCMAGIC=
  30. setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
  31. set RelPath=%_NTDRIVE%\release\%mybuildnum%\%lang%\%_buildArch%%_buildType%\slp
  32. if not exist %RelPath% (
  33. call errmsg.cmd "%RelPath% does not exist"
  34. goto :EOF
  35. )
  36. call executecmd.cmd "xcopy /dei %RelPath%\pro %RelPath%\procd1"
  37. if not exist %RelPath%\procd2 call executecmd.cmd "md %RelPath%\procd2"
  38. call executecmd.cmd "move %RelPath%\procd1\cmpnents %RelPath%\procd2\"