@echo off
setlocal EnableExtensions EnableDelayedExpansion
set path=%~dp0;%~dp0.\bin;%path%


rem Create hard links for XP driver integration

rem BatchLink Utility
rem Copyright © 2000 Mike Woodring
rem http://www.bearcanyon.com

rem ### parameters ####################################################
set Source=%~1

set Destination=%Source%_BTS
if not %2.==. set Destination=%~2
rem ###################################################################


if not exist "%Source%" (
echo error: source directory %source% not found
echo. & echo Syntax: %~nx0 source [destination]
goto :eof)
if not exist "%~dp0.\bin\BatchLink.exe" (echo error: BatchLink.exe not found &goto :eof)

md "%Destination%"

call :calc_string_length %Source%
set /a new_dir_start=%string_length%+1


echo create hard links at %Destination%

pushd %Destination%
BatchLink.exe %Source% /q
popd

pushd %Source%
for /D /R . %%a in (*) do call :mklink %%a
popd

goto :eof


:mklink
set Source=%~1
call :exec set Target=%%Source:~%new_dir_start%%%
echo %Target%
pushd "%Destination%"
md "%Target%"
cd /d "%Target%"
BatchLink.exe "%Source%" /q
popd
goto :eof


:calc_string_length
set string=%*
set string=%string: =#%
set string_length=-1

echo %string%

for /L %%a in (0,1,255) do (
call :exec set Char=%%string:~%%a,1%%
if !Char!.==. (set string_length=%%a & goto :eof)
)
goto :eof


:exec
%*
goto :eof

;add default windows versions
XPR1 XP_PRO install XP Pro
;
;add driverpacks version
XPR2 XP_PRO_BTS install XP Pro - with BTS driverpacks

[MenuItems]
C:\      ; Boot from drive C:

\XPR1\setupldr.bin;install XP Pro
\XPR2\setupldr.bin;install XP Pro - with BTS driverpacks

:reboot      ; REBOOT         ; Reboot PC

@echo off
setlocal EnableExtensions EnableDelayedExpansion

REM +=================================================================+
REM | Multi-Boot CD |
REM | |
REM | bootpath solution |
REM | |
REM | based on: DVD http://flyakite.msfn.org/ |
REM | |
REM |--- created by cdob ---------------------------------------------|
REM | |
REM +--- under construction ver -272 --------------------------------+

set path=%~dp0;%~dp0.\bin;%path%

set multi_lst=%~dp0multi01.txt
if not %~1.==. set multi_lst=%~1

rem mkisofs sort file
set sort_lst=%~dp0multi_sort.txt

rem mkisofs parameter file
set mkisofs_par=%~dp0mkisofs.par

pushd "%~dp0.."

echo -o multi_bootpath\XP_multi.iso > %mkisofs_par%

(echo -iso-level 3 -U -D
echo -force-uppercase
echo -volid "XP_MULTI"
echo -b BCDW/loader.bin -hide loader.bin -hide boot.catalog
echo -no-emul-boot -boot-load-size 4
echo -duplicates-once
echo -graft-points -cache-inodes -follow-links
) >> %mkisofs_par%

rem exclude some folders
(echo -x win9xmig
echo -x win9xupg
echo -x winntupg
echo -x COMPDATA
) >> %mkisofs_par%

rem add multi_bootpath\root folder
echo multi_bootpath/root >> %mkisofs_par%

if exist multi_bootpath\root\win51* del multi_bootpath\root\win51*

FOR /F "eol=; tokens=1,*" %%a in (%multi_lst%) do call :add_multi %%a %%b

rem fix: replace multi_bootpath\root\win51* files by 0 byte size
for %%a in (multi_bootpath\root\win51*) do (
echo /%%~nxa=nul: >> %mkisofs_par%
del %%a
)

echo on
mkisofs.exe @%mkisofs_par%
@echo off
popd

goto :eof =============================================================


:add_multi ============================================================
set boot_4_char=%~1
set source_inst_files=%~2

echo. &echo add: %boot_4_char% %source_inst_files%

if not exist multi_bootpath\%boot_4_char%\I386 md multi_bootpath\%boot_4_char%\I386

rem collect flag files at root. And create empty flag files at %boot_4_char%
for %%a in (%source_inst_files%\win51*) do (
copy /y %%a multi_bootpath\root >nul 2>&1
echo /%boot_4_char%/%%~nxa=nul: >> %mkisofs_par%
)

rem add I386 files, remap to new four char name
(echo /%boot_4_char%/I386=multi_bootpath/%boot_4_char%/I386
echo /%boot_4_char%/I386=%source_inst_files:\=/%/I386
) >> %mkisofs_par%


rem add available $OEM$ OEM folder
for %%a in ($OEM$ OEM) do (
for %%b in (multi_bootpath\%boot_4_char% %source_inst_files%) do (
if exist %%b\%%a (
echo %%b\%%a
set read_path=%%b\%%a
echo /%boot_4_char%/%%a/=!read_path:\=/! >> %mkisofs_par%
)
)
)

rem patch txtsetup.sif SetupSourcePath: set \XP_INST_%boot_4_char%\
if not exist multi_bootpath\%boot_4_char%\txtsetup.sif (
sed.exe -e s/"^SetupSourcePath.*=.*$"/"SetupSourcePath = \"\\%boot_4_char%\\\\\"\nBootPath = \\%boot_4_char%\\I386\\ "/g %source_inst_files%\I386\txtsetup.sif> multi_bootpath\%boot_4_char%\TXTSetup.SIF
)

rem add \%boot_4_char%\ files
(echo /%boot_4_char%/TXTSETUP.SIF=multi_bootpath/%boot_4_char%/TXTSetup.SIF
echo /%boot_4_char%/NTDETECT.COM=%source_inst_files:\=/%/I386/NTDETECT.COM
echo /%boot_4_char%/SETUPLDR.BIN=%source_inst_files:\=/%/I386/SETUPLDR.BIN
) >> %mkisofs_par%


rem todo dosnet.inf

goto :eof =============================================================

-o multi_bootpath\XP_multi.iso
-iso-level 3 -U -D
-force-uppercase
-volid "XP_MULTI"
-b BCDW/loader.bin -hide loader.bin -hide boot.catalog
-no-emul-boot -boot-load-size 4
-duplicates-once
-graft-points -cache-inodes -follow-links
-x win9xmig
-x win9xupg
-x winntupg
-x COMPDATA
multi_bootpath/root
/XPR1/WIN51IP=nul:
/XPR1/WIN51IP.SP3=nul:
/XPR1/I386=multi_bootpath/XPR1/I386
/XPR1/I386=XP_PRO/I386
/XPR1/TXTSETUP.SIF=multi_bootpath/XPR1/TXTSetup.SIF
/XPR1/NTDETECT.COM=XP_PRO/I386/NTDETECT.COM
/XPR1/SETUPLDR.BIN=XP_PRO/I386/SETUPLDR.BIN
/XPR2/WIN51IP=nul:
/XPR2/WIN51IP.SP3=nul:
/XPR2/I386=multi_bootpath/XPR2/I386
/XPR2/I386=XP_PRO_BTS/I386
/XPR2/OEM/=XP_PRO_BTS/OEM
/XPR2/TXTSETUP.SIF=multi_bootpath/XPR2/TXTSetup.SIF
/XPR2/NTDETECT.COM=XP_PRO_BTS/I386/NTDETECT.COM
/XPR2/SETUPLDR.BIN=XP_PRO_BTS/I386/SETUPLDR.BIN
/WIN51IP=nul:
/WIN51IP.SP3=nul: