mirror of https://github.com/tongzx/nt5src
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.
141 lines
3.6 KiB
141 lines
3.6 KiB
@echo off
|
|
REM ------------------------------------------------------------------
|
|
REM
|
|
REM hnw.cmd
|
|
REM This will call iexpress to generate a self-extracting CAB that
|
|
REM will be used when running our tool off of a floppy disk.
|
|
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;
|
|
use Logmsg;
|
|
|
|
sub Usage { print<<USAGE; exit(1) }
|
|
hnw.cmd [-l <language>]
|
|
|
|
This is for the Home Networking Wizard. It runs iexpress to generate
|
|
a self-extracting CAB and install into support\tools.
|
|
USAGE
|
|
|
|
sub Dependencies {
|
|
if ( !open DEPEND, ">>$ENV{_NTPOSTBLD}\\..\\build_logs\\dependencies.txt" ) {
|
|
errmsg("Unable to open dependency list file.");
|
|
die;
|
|
}
|
|
print DEPEND<<DEPENDENCIES;
|
|
\[$0\]
|
|
IF { NetSetup.EXE } ADD { hnw.sed }
|
|
|
|
DEPENDENCIES
|
|
close DEPEND;
|
|
exit;
|
|
}
|
|
|
|
my $qfe;
|
|
parseargs('?' => \&Usage,
|
|
'plan' => \&Dependencies,
|
|
'qfe:' => \$qfe);
|
|
|
|
if ( -f "$ENV{_NTPOSTBLD}\\..\\build_logs\\skip.txt" ) {
|
|
if ( !open SKIP, "$ENV{_NTPOSTBLD}\\..\\build_logs\\skip.txt" ) {
|
|
errmsg("Unable to open skip list file.");
|
|
die;
|
|
}
|
|
while (<SKIP>) {
|
|
chomp;
|
|
exit if lc$_ eq lc$0;
|
|
}
|
|
close SKIP;
|
|
}
|
|
|
|
|
|
# *** NEXT FEW LINES ARE TEMPLATE ***
|
|
$ENV{"_CPCMAGIC"}++;exit(system($0)>>8);
|
|
__END__
|
|
:CPCBegin
|
|
set _CPCMAGIC=
|
|
setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
|
|
REM *** BEGIN YOUR CMD SCRIPT BELOW ***
|
|
|
|
REM
|
|
REM x86 only!
|
|
REM
|
|
|
|
if not defined x86 goto end
|
|
|
|
REM
|
|
REM Use iexpress.exe to generate the self-extracting executable;
|
|
REM
|
|
|
|
REM first update the sed with the proper binaries directory
|
|
set nswtemp=%temp%\nsw
|
|
set hnw.sed=%nswtemp%\hnw.sed
|
|
set hnw.sed2=%nswtemp%\hnw.sed2
|
|
set hnw.sed3=%nswtemp%\hnw.sed3
|
|
set doubledpath=%_NtPostBld:\=\\%
|
|
set doubledtemppath=%nswtemp:\=\\%
|
|
|
|
call logmsg.cmd "Deleting old netsetup.exe unpacked binaries from %nswtemp%"
|
|
del /q /f %nswtemp%
|
|
|
|
perl -n -e "s/BINARIES_DIR/%doubledpath%/g;print $_;" < %_NtPostBld%\hnw.sed > %hnw.sed%
|
|
|
|
call logmsg.cmd "Unpack Gold netsetup.exe into %nswtemp%"
|
|
%RazzleToolPath%\sp\data\GoldFiles\%Lang%\%_BuildArch%%_BuildType%\netsetup.exe -Q -C -T:%nswtemp%
|
|
|
|
call logmsg.cmd "Overlay new service pack files to %nswtemp%"
|
|
perl "%RazzleToolPath%\sp\hnw.pl" %hnw.sed% %nswtemp%
|
|
|
|
perl -n -e "s/TargetName=BINARIES_DIR/TargetName=%doubledpath%/g;print $_;" < %_NtPostBld%\hnw.sed > %hnw.sed2%
|
|
perl -n -e "s/BINARIES_DIR/%doubledtemppath%/g;print $_;" < %hnw.sed2% > %hnw.sed3%
|
|
perl -n -e "s/UPnPDown\\//g;print $_;" < %hnw.sed3% > %hnw.sed%
|
|
|
|
REM Now call iexpress on the new sed
|
|
|
|
if not exist %hnw.sed% (
|
|
call errmsg.cmd "File %hnw.sed% not found."
|
|
popd& goto end
|
|
)
|
|
|
|
set outpath=%_NTPostBld%
|
|
if exist %outpath%\netsetup.exe del /f %outpath%\netsetup.exe
|
|
|
|
|
|
|
|
REM
|
|
REM Munge the path so we use the correct wextract.exe to build the package with...
|
|
REM NOTE: We *want* to use the one we just built (and for Intl localized)!
|
|
REM
|
|
set _NEW_PATH_TO_PREPEND=%RazzleToolPath%\%PROCESSOR_ARCHITECTURE%\loc\%LANG%
|
|
set _OLD_PATH_BEFORE_PREPENDING=%PATH%
|
|
set PATH=%_NEW_PATH_TO_PREPEND%;%PATH%
|
|
|
|
call logmsg.cmd "Package all binaries from %nswtemp% into new netsetup.exe"
|
|
call ExecuteCmd.cmd "start /min /wait iexpress.exe /M /N /Q %hnw.sed%"
|
|
|
|
|
|
REM
|
|
REM Return the path to what it was before...
|
|
REM
|
|
set PATH=%_OLD_PATH_BEFORE_PREPENDING%
|
|
|
|
|
|
|
|
|
|
if not exist %outpath%\netsetup.exe (
|
|
call errmsg.cmd "IExpress.exe failed on %hnw.sed%."
|
|
popd& goto end
|
|
)
|
|
popd
|
|
|
|
:end
|
|
seterror.exe "%errors%"& goto :EOF
|