windows-xp/Source/XPSP1/NT/tools/postbuildscripts/deploytools.cmd

@REM  -----------------------------------------------------------------
@REM
@REM  deploytools.cmd - RyanBurk, JCohen
@REM     Creates the Whistler deployment cab
@REM
@REM  Copyright (c) Microsoft Corporation. All rights reserved.
@REM
@REM  -----------------------------------------------------------------
@if defined _CPCMAGIC goto CPCBegin
@perl -x "%~f0" %*
@goto :EOF
#!perl
use strict;
use lib $ENV{RAZZLETOOLPATH} . "\\PostBuildScripts";
use lib $ENV{RAZZLETOOLPATH};
use PbuildEnv;
use ParseArgs;

sub Usage { print<<USAGE; exit(1) }
deploytools [-l <language>]

Creates the Whistler deployment cab
USAGE

parseargs('?' => \&Usage);


#             *** TEMPLATE CODE ***
$ENV{"_CPCMAGIC"}++;exit(system($0)>>8);
__END__
@:CPCBegin
@set _CPCMAGIC=
@setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
@if not defined DEBUG echo off
@REM          *** CMD SCRIPT BELOW ***

REM
REM Check for the working folder
REM
if NOT EXIST %_NTPostBld%\dump\deploytools (
   call errmsg.cmd "%_NTPostBld%\dump\deploytools does not exist; unable to create deploy.cab."
   goto :EOF
)

REM
REM If there are old bits clean them.
REM

if EXIST %_NTPostBld%\dump\deploytools\obj (
   cd /d %_NTPostBld%\dump\deploytools
   if errorlevel 1 goto :EOF
   call ExecuteCmd.cmd "rd obj /s /q"
   if errorlevel 1 goto :EOF
)
   

REM
REM rename the readme for the deploy.cab
REM

cd /d %_NTPostBld%\deploycab
if errorlevel 1 (
   call errmsg.cmd "Unable to switch dirs (1), exiting"
   goto :EOF
)

call ExecuteCmd.cmd "copy readmed.txt readme.txt /y"
if errorlevel 1 (
   call errmsg.cmd "Unable to copy readmed.txt, exiting"
   goto :EOF
)

REM --- WE DONT NEED TO DO THIS ANYMORE ---
REM
REM rename the ref.chm for the deploy.cab
REM

REM cd /d %_NTPostBld%\deploycab
REM if errorlevel 1 (
REM    call errmsg.cmd "Unable to switch dirs (1), exiting"
REM    goto :EOF
REM )
REM
REM call ExecuteCmd.cmd "copy ref_deploy.chm ref.chm /y"
REM if errorlevel 1 (
REM    call errmsg.cmd "Unable to copy ref_deploy.chm, exiting"
REM    goto :EOF
REM )

REM
REM Come back to the working folder and hit nmake to build the cabs
REM

cd /d %_NTPostBld%\dump\deploytools
if errorlevel 1 (
   call errmsg.cmd "Unable to switch dirs (2), exiting"
   goto :EOF
)

call ExecuteCmd.cmd "nmake /F makefile.deploy"
if errorlevel 1 (
   call errmsg.cmd "nmake /f failed, exiting"
   goto :EOF
)

REM
REM Deployment Tools: Now %_NTPostBld%\support\tools is the working folder
REM

cd /d %_NTPostBld%\support\tools
if errorlevel 1 (
   call errmsg.cmd "Unable to switch dirs (3), exiting"
   goto :EOF
)

pushd %_NTPostBld%\support\tools
if errorlevel 1 (
   call errmsg.cmd "Pushd (tools) failed, exiting"
   goto :EOF
)

REM
REM Deployment Tools: check whether the copy of the cabs have been successfull.
REM

if NOT exist deploy.cab (
    call errmsg.cmd "Unable to find deploy.cab."
    popd
    goto :EOF
)

call logmsg.cmd "Whistler Deployment Cabgen completed successfully."

popd