Leaked source code of windows server 2003
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.
|
|
@REM ----------------------------------------------------------------- @REM @REM nt5infcat.cmd - WadeLa @REM Creates the nt5inf.cat system catalogs for each sku @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) } nt5infcat.cmd [-l <language>]
Creates the nt5inf.cat system catalogs for each sku 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 Set some local vars set catCDFs=%tmp%\CDFs set CatTemp=%tmp%\cattemp set catfiles=%tmp%\cats
REM Make a tempfile for catsign if NOT exist %CatTemp% md %CatTemp% echotime /t > %CatTemp%\nt5infcat.tmp
set InfList=
perl %RazzleToolPath%\CkSku.pm -t:pro -l:%lang% if %errorlevel% EQU 0 ( set InfList=!InfList! . )
perl %RazzleToolPath%\CkSku.pm -t:per -l:%lang% if %errorlevel% EQU 0 ( set InfList=!InfList! perinf )
perl %RazzleToolPath%\CkSku.pm -t:bla -l:%lang% if %errorlevel% EQU 0 ( set InfList=%InfList% blainf) )
perl %RazzleToolPath%\CkSku.pm -t:sbs -l:%lang% if %errorlevel% EQU 0 ( set InfList=%InfList% sbsinf) )
perl %RazzleToolPath%\CkSku.pm -t:srv -l:%lang% if %errorlevel% EQU 0 ( set InfList=!InfList! srvinf )
perl %RazzleToolPath%\CkSku.pm -t:ads -l:%lang% if %errorlevel% EQU 0 ( set InfList=!InfList! entinf )
perl %RazzleToolPath%\CkSku.pm -t:dtc -l:%lang% if %errorlevel% EQU 0 ( set InfList=!InfList! dtcinf )
for %%a in (%InfList%) do ( if NOT exist %catfiles%\%%a md %catfiles%\%%a if NOT exist %_NTPostBld%\congeal_scripts\%%a md %_NTPostBld%\congeal_scripts\%%a call logmsg.cmd "Creating %catfiles%\%%a\nt5inf.CAT ..." set flat_name=%%a set flat_name=!flat_name:\=_! makecat -o %_NTPostBld%\congeal_scripts\%%a\nt5inf.hash -v %catCDFS%\%%a\nt5inf.CDF > %catCDFs%\nt5inf.!flat_name!.log if errorlevel 1 ( for /f "tokens=1*" %%i in ('findstr /i processed %catCDFs%\nt5inf.!flat_name!.log') do call errmsg.cmd "%%i %%j" call errmsg.cmd "makecat -o %_NTPostBld%\congeal_scripts\%%a\nt5inf.hash -v %catCDFS%\%%a\nt5inf.CDF failed" set exitcode=1 ) copy nt5inf.CAT %catfiles%\%%a\ del nt5inf.cat )
del %CatTemp%\nt5infcat.tmp
:end seterror.exe "%errors%"& goto :EOF
|