| rem | |
| rem This script performs several maintenance functions prior to building | |
| rem simh projects. Some of these funtions are optional and depend on the | |
| rem needs of the project being built, and others are generic and are always | |
| rem performed. | |
| rem | |
| rem The optional activities are invoked by passing parameters to this | |
| rem procedure. The parameters are: | |
| rem ROM To run the BuildROMs program prior to executing a project | |
| rem build. This program verifies that the include files containing | |
| rem ROM images are consistent with the ROM images from which they | |
| rem are derived. | |
| rem BUILD To validate that the required dependent libraries and include | |
| rem files are available in the directory ..\..\windows-build\ | |
| rem These libraries currently include winpcap, pthreads, SDL | |
| rem and LIBPCRE. | |
| rem LIBSDL To validate that the required dependent SDL libraries and include | |
| rem files are available in the directory ..\..\windows-build\ | |
| rem LIBPCRE To validate that the required dependent PCRE libraries and include | |
| rem files are available in the directory ..\..\windows-build\ | |
| rem | |
| rem In addition to the optional activities mentioned above, other activities | |
| rem are also performed. These include: | |
| rem - performing the activities which make confirm or generate the git | |
| rem repository commit id available in an include file during compiles. | |
| rem | |
| rem | |
| rem Everything implicitly requires BUILD to also be set to have | |
| rem any meaning, it always gets set. | |
| set _X_BUILD=BUILD | |
| call :FindVCVersion _VC_VER | |
| :_next_arg | |
| if "%1" == "" goto _done_args | |
| set _arg= | |
| if /I "%1" == "ROM" set _arg=ROM | |
| if /I "%1" == "BUILD" set _arg=BUILD | |
| if /I "%1" == "LIBSDL" set _arg=LIBSDL | |
| if /I "%1" == "LIBPCRE" set _arg=LIBPCRE | |
| if /I "%1" == "FINDFONT" set _arg=FINDFONT | |
| if "%_arg%" == "" echo *** warning *** unknown parameter %1 | |
| if /I "%1" == "FINDFONT" set _X_FontName=%2 | |
| if /I "%1" == "FINDFONT" set _X_FontIncludeName=%3 | |
| if /I "%_arg%" == "FINDFONT" shift | |
| if /I "%_arg%" == "FINDFONT" shift | |
| if not "%_arg%" == "" set _X_%_arg%=%_arg% | |
| shift | |
| goto _next_arg | |
| :_done_args | |
| :_do_rom | |
| pushd .. | |
| if "%_X_ROM%" == "" goto _done_rom | |
| SET _BLD= | |
| if exist BIN\NT\Win32-Debug\BuildROMs.exe SET _BLD=BIN\NT\Win32-Debug\BuildROMs.exe | |
| if exist BIN\NT\Win32-Release\BuildROMs.exe SET _BLD=BIN\NT\Win32-Release\BuildROMs.exe | |
| if "%_BLD%" == "" echo ************************************************ | |
| if "%_BLD%" == "" echo ************************************************ | |
| if "%_BLD%" == "" echo ** Project dependencies are not correct. ** | |
| if "%_BLD%" == "" echo ** This project should depend on BuildROMs. ** | |
| if "%_BLD%" == "" echo ************************************************ | |
| if "%_BLD%" == "" echo ************************************************ | |
| if "%_BLD%" == "" echo error: Review the Output Tab for more details. | |
| if "%_BLD%" == "" exit 1 | |
| %_BLD% | |
| if not errorlevel 1 goto _done_rom | |
| if not exist "BIN\NT\Win32-Release\BuildROMs.exe" exit 1 | |
| del "BIN\NT\Win32-Release\BuildROMs.exe" | |
| popd | |
| goto _do_rom | |
| :_done_rom | |
| popd | |
| :_check_build | |
| if "%_X_BUILD%" == "" goto _done_build | |
| if not exist ../../windows-build-windows-build goto _check_files | |
| rem This is a newly extracted windows-build.zip file with the | |
| rem top level directory named as it existed in the zip file. | |
| rem We rename that top level directory. If a previous one already | |
| rem exists, that will be an older version, so we try to remove | |
| rem that one first. | |
| if exist ..\..\windows-build rmdir /s /q ..\..\windows-build | |
| ren ..\..\windows-build-windows-build windows-build | |
| if errorlevel 1 goto _notice3 | |
| if exist ../../windows-build-windows-build goto _notice3 | |
| :_check_files | |
| call :FindVCVersion _VC_VER | |
| if not exist ../../windows-build goto _notice1 | |
| if not exist ../../windows-build/lib goto _notice2 | |
| set _X_WINDOWS_BUILD= | |
| for /F "usebackq tokens=2" %%i in (`findstr /C:"WINDOWS-BUILD" ..\..\windows-build\Windows-Build_Versions.txt`) do SET _X_WINDOWS_BUILD=%%i | |
| if "%_X_WINDOWS_BUILD%" LSS "20180806" goto _notice2 | |
| set _X_WINDOWS_BUILD= | |
| if not exist ../../windows-build/lib/VisualCVersionSupport.txt goto _find_vc_support | |
| set _X_VC_VER= | |
| for /F "usebackq tokens=2*" %%i in (`findstr /C:"_VC_VER=%_VC_VER% " ..\..\windows-build\lib\VisualCVersionSupport.txt`) do SET _X_VC_VER=%%i %%j | |
| if "%_X_VC_VER%" neq "" echo Library support for %_X_VC_VER% is available | |
| if "%_X_VC_VER%" neq "" goto _done_libsdl | |
| :_find_vc_support | |
| set _X_VC_VER_DIR= | |
| for /d %%i in ("../../windows-build/lib/*") do call :CheckDirectoryVCSupport _X_VC_VER_DIR %%i "../../windows-build/lib/" | |
| if "%_X_VC_VER_DIR%" equ "" goto _notice4 | |
| :_make_vc_support_active | |
| for /F "usebackq tokens=2*" %%i in (`findstr /C:"_VC_VER=%_VC_VER% " "%_X_VC_VER_DIR%\VisualCVersionSupport.txt"`) do SET _X_VC_VER=%%i %%j | |
| echo Enabling Library support for %_X_VC_VER% | |
| call "%_X_VC_VER_DIR%\Install-Library-Support.cmd" | |
| :_done_libsdl | |
| if "%_X_FINDFONT%" == "" goto _done_findfont | |
| if "%_X_FontName%" == "" goto _done_findfont | |
| echo. >%_X_FontIncludeName%.temp | |
| set FONTFILE=%windir%\Fonts\%_X_FontName% | |
| if not exist "%FONTFILE%" echo Can't find font %_X_FontName% | |
| if not exist "%FONTFILE%" goto _done_findfont | |
| set FONTFILE=%FONTFILE:\=/% | |
| echo #define FONTFILE %FONTFILE% >>%_X_FontIncludeName%.temp | |
| if not exist %_X_FontIncludeName% goto _found_font | |
| fc %_X_FontIncludeName%.temp %_X_FontIncludeName% >NUL | |
| if NOT ERRORLEVEL 1 goto _done_findfont | |
| :_found_font | |
| echo Found: %FONTFILE% | |
| move /Y %_X_FontIncludeName%.temp %_X_FontIncludeName% >NUL | |
| :_done_findfont | |
| if exist %_X_FontIncludeName%.temp del %_X_FontIncludeName%.temp | |
| call :FindVCVersion _VC_VER | |
| if not exist "..\..\windows-build\libpng-1.6.18\projects\Release Library" goto _setup_library | |
| if not exist "..\..\windows-build\libpng-1.6.18\projects\Release Library\VisualC.version" set _LIB_VC_VER=9 | |
| if exist "..\..\windows-build\libpng-1.6.18\projects\Release Library\VisualC.version" for /f "usebackq delims=." %%v in (`type "..\..\windows-build\libpng-1.6.18\projects\Release Library\VisualC.version"`) do set _LIB_VC_VER=%%v | |
| if %_LIB_VC_VER% EQU %_VC_VER% goto _done_library | |
| if %_VC_VER% GEQ 14 goto _check_new_library | |
| if %_LIB_VC_VER% LSS 14 goto _done_library | |
| goto _setup_library | |
| :_check_new_library | |
| if %_LIB_VC_VER% GEQ 14 goto _done_library | |
| :_setup_library | |
| if %_VC_VER% LSS 14 set _VCLIB_DIR_=vstudio 2008 | |
| if %_VC_VER% GEQ 14 set _VCLIB_DIR_=vstudio | |
| if exist "..\..\windows-build\libpng-1.6.18\projects\Release Library" rmdir/s/q "..\..\windows-build\libpng-1.6.18\projects\Release Library" | |
| if exist "..\..\windows-build\libpng-1.6.18\projects\Debug Library" rmdir/s/q "..\..\windows-build\libpng-1.6.18\projects\Debug Library" | |
| xcopy /S /I "..\..\windows-build\libpng-1.6.18\projects\%_VCLIB_DIR_%\Release Library\*" "..\..\windows-build\libpng-1.6.18\projects\Release Library\" > NUL 2>&1 | |
| xcopy /S /I "..\..\windows-build\libpng-1.6.18\projects\%_VCLIB_DIR_%\Debug Library\*" "..\..\windows-build\libpng-1.6.18\projects\Debug Library\" > NUL 2>&1 | |
| set _VCLIB_DIR_= | |
| set _LIB_VC_VER= | |
| :_done_library | |
| goto _done_build | |
| :_notice1 | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| echo ** The required build support is not available. ** | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| set _exit_reason=The required build support is not available. | |
| goto _ProjectInfo | |
| :_notice2 | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| echo ** The required build support is out of date. ** | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| set _exit_reason=The required build support is out of date. | |
| goto _ProjectInfo | |
| :_notice3 | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| echo ** Can't rename ../../windows-build-windows-build ** | |
| echo ** to ../../windows-build ** | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| set _exit_reason=Can't rename ../../windows-build-windows-build to ../../windows-build | |
| goto _ProjectInfo | |
| :_notice4 | |
| echo ********************************* | |
| echo ********************************* | |
| echo ** Visual Studio Version: %_VC_VER% ** | |
| echo ** Visual Studio Version: %_VC_VER% ** | |
| echo ** Visual Studio Version: %_VC_VER% ** | |
| echo ** Visual Studio Version: %_VC_VER% ** | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| echo ** Windows Build support for your Microsoft ** | |
| echo ** Visual Studio version is not available yet. ** | |
| echo ** Please create a new issue at: ** | |
| echo ** https://github.com/simh/simh/issues describing ** | |
| echo ** what you've done and support should be added ** | |
| echo ** soon. Otherwise, you can install an earlier ** | |
| echo ** version of Microsoft Visual Studio and use ** | |
| echo ** that. ** | |
| echo ***************************************************** | |
| echo ***************************************************** | |
| goto _ProjectInfo | |
| :_ProjectInfo | |
| type 0ReadMe_Projects.txt | |
| echo error: %_exit_reason% | |
| echo error: Review the Output Tab for more details. | |
| exit 1 | |
| :_done_build | |
| :_CheckGit | |
| if not exist ..\.git goto _done_id | |
| call :FindGit _GIT_GIT | |
| if "%_GIT_GIT%" neq "" goto _SetId | |
| echo ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** | |
| echo ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** | |
| echo ** ** | |
| echo ** Your local simh code is in a git repository, ** | |
| echo ** however, the git program executable can not be ** | |
| echo ** readily found on your system. ** | |
| echo ** ** | |
| echo ** You should download and install git from: ** | |
| echo ** ** | |
| echo ** https://git-scm.com/download/win ** | |
| echo ** ** | |
| echo ** while installing git for windows, be sure to ** | |
| echo ** select the option to "Use Git from the Windows ** | |
| echo ** Command Prompt" ** | |
| echo ** ** | |
| echo ** You should logout and login again after initally ** | |
| echo "" installing git to be sure that the installation ** | |
| echo ** location is properly visible in your search path.** | |
| echo ** ** | |
| echo ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** | |
| echo ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** ERROR ** | |
| echo error: Review the Output Tab for more details. | |
| exit 1 | |
| :_done_git | |
| :_SetId | |
| rem | |
| rem A race condition exists while creating the .git-commit-id.h file. | |
| rem This race can happen at the beginning of a parallel build where | |
| rem several projects can start execution at almost the same time. | |
| rem | |
| SET ACTUAL_GIT_COMMIT_ID= | |
| SET ACTUAL_GIT_COMMIT_TIME= | |
| SET GIT_COMMIT_ID= | |
| SET GIT_COMMIT_TIME= | |
| SET _GIT_COMMIT_ID_TEMP=.git-commit-id-temp-%RANDOM% | |
| "%_GIT_GIT%" log -1 --pretty="SIM_GIT_COMMIT_ID %%H%%nSIM_GIT_COMMIT_TIME %%aI" >%_GIT_COMMIT_ID_TEMP% | |
| for /F "usebackq tokens=2" %%i in (`findstr /C:SIM_GIT_COMMIT_ID %_GIT_COMMIT_ID_TEMP%`) do SET ACTUAL_GIT_COMMIT_ID=%%i | |
| for /F "usebackq tokens=2" %%i in (`findstr /C:SIM_GIT_COMMIT_TIME %_GIT_COMMIT_ID_TEMP%`) do SET ACTUAL_GIT_COMMIT_TIME=%%i | |
| if exist ..\.git-commit-id for /F "usebackq tokens=2" %%i in (`findstr /C:SIM_GIT_COMMIT_ID ..\.git-commit-id`) do SET GIT_COMMIT_ID=%%i | |
| if exist ..\.git-commit-id for /F "usebackq tokens=2" %%i in (`findstr /C:SIM_GIT_COMMIT_TIME ..\.git-commit-id`) do SET GIT_COMMIT_TIME=%%i | |
| if "%ACTUAL_GIT_COMMIT_ID%" neq "%GIT_COMMIT_ID%" move /Y %_GIT_COMMIT_ID_TEMP% ..\.git-commit-id | |
| if "%ACTUAL_GIT_COMMIT_ID%" equ "%GIT_COMMIT_ID%" del %_GIT_COMMIT_ID_TEMP% | |
| SET GIT_COMMIT_ID=%ACTUAL_GIT_COMMIT_ID% | |
| SET GIT_COMMIT_TIME=%ACTUAL_GIT_COMMIT_TIME% | |
| SET _GIT_COMMIT_ID_TEMP= | |
| SET ACTUAL_GIT_COMMIT_ID= | |
| SET ACTUAL_GIT_COMMIT_TIME= | |
| :_VerifyGitCommitId.h | |
| SET OLD_GIT_COMMIT_ID= | |
| if not exist .git-commit-id.h echo.>.git-commit-id.h | |
| for /F "usebackq tokens=3" %%i in (`findstr /C:SIM_GIT_COMMIT_ID .git-commit-id.h`) do SET OLD_GIT_COMMIT_ID=%%i | |
| if "%GIT_COMMIT_ID%" equ "%OLD_GIT_COMMIT_ID%" goto _IdGood | |
| echo Generating updated .git-commit-id.h containing id %GIT_COMMIT_ID% | |
| echo #define SIM_GIT_COMMIT_ID %GIT_COMMIT_ID% >.git-commit-id.h | |
| echo #define SIM_GIT_COMMIT_TIME %GIT_COMMIT_TIME% >>.git-commit-id.h | |
| if errorlevel 1 echo Retrying... | |
| if errorlevel 1 goto _SetId | |
| :_IdGood | |
| :_done_id | |
| if not exist .git-commit-id.h echo. >.git-commit-id.h | |
| goto :EOF | |
| :WhereInPath | |
| if "%~$PATH:1" NEQ "" exit /B 0 | |
| exit /B 1 | |
| :WhichInPath | |
| if "%~$PATH:1" EQU "" exit /B 1 | |
| set %2=%~$PATH:1 | |
| exit /B 0 | |
| :FindGit | |
| set _GIT_TMP=%1 | |
| call :WhichInPath git.exe _GIT_TMP_ | |
| if "%_GIT_TMP_%" neq "" goto GitFound | |
| call :WhichInPath cl.exe _VC_CL_ | |
| for /f "tokens=1-4 delims=\" %%a in ("%_VC_CL_%") do set _GIT_BASE_="%%a\%%b\%%c\%%d\" | |
| for /r %_GIT_BASE_% %%a in (git.exe) do if exist "%%a" set _GIT_TMP_=%%a | |
| :GitFound | |
| set %_GIT_TMP%=%_GIT_TMP_% | |
| set _VC_CL_= | |
| set _GIT_BASE_= | |
| set _GIT_TMP_= | |
| set _GIT_TMP= | |
| exit /B 0 | |
| :FindVCVersion | |
| call :WhichInPath cl.exe _VC_CL_ | |
| for /f "tokens=3-9 delims=\" %%a in ("%_VC_CL_%") do call :VCCheck _VC_VER_NUM_ "%%a" "%%b" "%%c" "%%d" "%%e" "%%f" "%%g" | |
| for /f "delims=." %%a in ("%_VC_VER_NUM_%") do set %1=%%a | |
| set _VC_CL= | |
| exit /B 0 | |
| :VCCheck | |
| set _VC_TMP=%1 | |
| :_VCCheck_Next | |
| shift | |
| set _VC_TMP_=%~1 | |
| if "%_VC_TMP_%" equ "" goto _VCCheck_Done | |
| if "%_VC_TMP_:~0,24%" EQU "Microsoft Visual Studio " set %_VC_TMP%=%_VC_TMP_:Microsoft Visual Studio =% | |
| call :IsNumeric _VC_NUM_ %_VC_TMP_% | |
| if "%_VC_NUM_%" neq "" set %_VC_TMP%=%~1 | |
| if "%_VC_NUM_%" neq "" goto _VCCheck_Done | |
| goto _VCCheck_Next | |
| :_VCCheck_Done | |
| set _VC_TMP_= | |
| set _VC_TMP= | |
| set _VC_NUM_= | |
| exit /B 0 | |
| :CheckDirectoryVCSupport | |
| set _VC_Check_Path=%~3%~2/ | |
| set _VC_Check_Path=%_VC_Check_Path:/=\% | |
| if not exist "%_VC_Check_Path%VisualCVersionSupport.txt" exit /B 1 | |
| for /F "usebackq tokens=2*" %%k in (`findstr /C:"_VC_VER=%_VC_VER% " "%_VC_Check_Path%VisualCVersionSupport.txt"`) do set %1=%_VC_Check_Path% | |
| exit /B 0 | |
| :IsNumeric | |
| set _Numeric_TMP_=%~1 | |
| set _Numeric_Test_=%2 | |
| set _Numeric_Test_=%_Numeric_Test_:~0,1% | |
| set %_Numeric_TMP_%= | |
| if "%_Numeric_Test_%"=="0" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="1" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="2" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="3" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="4" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="5" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="6" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="7" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="8" set %_Numeric_TMP_%=1 | |
| if "%_Numeric_Test_%"=="9" set %_Numeric_TMP_%=1 | |
| set _Numeric_TMP_= | |
| set _Numeric_Test_= | |
| exit /B 0 |