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.

105 lines
2.3 KiB

  1. @echo off
  2. if defined _echo echo on
  3. if defined verbose echo on
  4. setlocal ENABLEDELAYEDEXPANSION
  5. for %%a in (./ .- .) do if ".%1." == "%%a?." goto Usage
  6. set Servers=barbkess_dev
  7. set Plat=%PROCESSOR_ARCHITECTURE%
  8. REM Figure out the name of the directory to prop to on
  9. REM each share.
  10. REM If trying to re-prop, the command-line argument says
  11. REM the name of the directory
  12. if /i not "%1" == "" (
  13. for %%a in ( %Servers% ) do (
  14. if /i exist \\%%a\debuggers\%1\%Plat% (
  15. set DirName=%1
  16. goto :EndSetDirName
  17. )
  18. )
  19. )
  20. REM Get Directory name -- its the date followed by the time
  21. REM This is the new name for the propagation direction
  22. set CurDate=%date%
  23. for /F "tokens=2,3,4 delims=/ " %%a in ("%CurDate%") do (
  24. set DirName=%%a-%%b-%%c
  25. )
  26. set CurTime=%time%
  27. for /F "tokens=1,2,3,4 delims=:^." %%a in ("%CurTime%") do (
  28. set DirName=%DirName%-%%a-%%b-%%c-%%d
  29. )
  30. :EndSetDirName
  31. echo DirName=%DirName%
  32. REM Prop the bits to each server
  33. REM
  34. for %%a in ( %Servers% ) do (
  35. REM First create the directory
  36. set PropDir=\\%%a\debuggers\%DirName%\%Plat%
  37. if /i exist "!PropDir!" (
  38. echo ERROR: The directory %PropDir% already exists
  39. goto errend
  40. )
  41. echo Creating !PropDir!
  42. md !PropDir!
  43. if not exist !PropDir! (
  44. echo ERROR: Could not create !PropDir!
  45. goto errend
  46. )
  47. xcopy /sc %_NTTREE%\dbg\dbg.msi !PropDir!
  48. xcopy /sc %_NTTREE%\dbg\dbginstall.cmd !PropDir!
  49. xcopy /sc %_NTTREE%\dbg\msizap.exe !PropDir!
  50. REM xcopy /sec %_NTTREE%\cabs\dbg\files\sdk !PropDir!\sdk
  51. REM xcopy /sec %_NTTREE%\cabs\dbg\files\ddk !PropDir!\ddk
  52. md !PropDir!\bin
  53. if not exist !PropDir!\bin (
  54. echo ERROR: Cannot create !PropDir!\bin
  55. goto errend
  56. )
  57. attrib +h !PropDir!\bin
  58. xcopy /sc %_NTTREE%\cabs\dbg\files\bin !PropDir!\bin
  59. xcopy /sc %_NTTREE%\cabs\dbg\files\pri !PropDir!\bin\w2001
  60. )
  61. echo DBGPROP: Finished
  62. goto end
  63. :Usage
  64. echo.
  65. echo USAGE: dbgprop [^<Dir^>]
  66. echo.
  67. echo Props the debugger files to the release servers.
  68. echo.
  69. echo ^<Dir^> Directory name to prop to. If nothing
  70. echo is entered, this will prop to a directory
  71. echo whose name is the date followed by the time.
  72. echo.
  73. goto errend
  74. :end
  75. endlocal
  76. goto :EOF
  77. :errend
  78. endlocal
  79. goto :EOF