make.bat: refactor for better param parsing and usage help (#6893)
heronwr
GitHub
parent
92d3cff957
commit
6b89249c6d
303
make.bat
303
make.bat
|
|
@ -1,77 +1,149 @@
|
|||
@echo off
|
||||
setlocal EnableDelayedExpansion
|
||||
|
||||
echo Building V
|
||||
REM option flags
|
||||
set /a valid_cc=0
|
||||
set /a use_local=0
|
||||
set /a verbose_log=0
|
||||
|
||||
REM default tcc
|
||||
set tcc_url=https://github.com/vlang/tccbin_win
|
||||
REM option variables
|
||||
set log_file="%TEMP%\v_make.log"
|
||||
set compiler_opt=""
|
||||
|
||||
REM tcc variables
|
||||
set tcc_url="https://github.com/vlang/tccbin_win.git"
|
||||
set tcc_dir="%~dp0thirdparty\tcc"
|
||||
|
||||
REM let a particular environment specify their own tcc
|
||||
if "%TCC_GIT%" =="" goto :init
|
||||
set tcc_url="%TCC_GIT%"
|
||||
|
||||
:init
|
||||
REM initialize the log file with the failure message
|
||||
set log_file=%TEMP%\v_make.bat.log
|
||||
echo Failed to compile - Create an issue at 'https://github.com/vlang/v' with the following info:>%log_file%
|
||||
echo.>>%log_file%
|
||||
|
||||
REM alleviate weird issues with this var
|
||||
set cloned_tcc=
|
||||
set ERRORLEVEL=
|
||||
if /I not "%TCC_GIT%" == "" (
|
||||
set tcc_url="%TCC_GIT%"
|
||||
)
|
||||
|
||||
pushd %~dp0
|
||||
|
||||
if "%~1"=="-local" goto :compile
|
||||
if "%~2"=="-local" goto :compile
|
||||
:verifyopt
|
||||
REM end at EOL
|
||||
if ["%~1"] == [""] goto :init
|
||||
|
||||
if exist "vc" (
|
||||
echo Updating vc...
|
||||
cd vc
|
||||
git pull --quiet
|
||||
cd ..
|
||||
) else (
|
||||
echo Cloning vc...
|
||||
git clone --depth 1 --quiet https://github.com/vlang/vc
|
||||
REM help option
|
||||
if "%~1" == "-h" call :usage& exit /b %ERRORLEVEL%
|
||||
if "%~1" == "--help" call :usage& exit /b %ERRORLEVEL%
|
||||
|
||||
REM compiler option
|
||||
if "%~1" == "-gcc" set compiler_opt="gcc"& shift& goto :verifyopt
|
||||
if "%~1" == "-msvc" set compiler_opt="msvc"& shift& goto :verifyopt
|
||||
if "%~1" == "-tcc" set compiler_opt="tcc"& shift& goto :verifyopt
|
||||
if "%~1" == "-fresh-tcc" set compiler_opt="fresh-tcc"& shift& goto :verifyopt
|
||||
if "%~1" == "-clang" set compiler_opt="clang"& shift& goto :verifyopt
|
||||
|
||||
REM standard options
|
||||
if "%~1" == "-local" (
|
||||
if !use_local! EQU 0 ( set /a use_local=1 )
|
||||
shift
|
||||
goto :verifyopt
|
||||
)
|
||||
if "%~1" == "-v" (
|
||||
if !verbose_log! EQU 0 ( set /a verbose_log=1 )
|
||||
shift
|
||||
goto :verifyopt
|
||||
)
|
||||
if "%~1" == "--verbose" (
|
||||
if !verbose_log! EQU 0 ( set /a verbose_log=1 )
|
||||
shift
|
||||
goto :verifyopt
|
||||
)
|
||||
if "%~1" == "-logfile" (
|
||||
if /I "%~2" == "" (
|
||||
echo Log file is not specified for -logfile parameter. 1>&2
|
||||
exit /b 2
|
||||
)
|
||||
pushd "%~dp2" 2>NUL || (
|
||||
echo The log file specified for -logfile parameter does not exist. 1>&2
|
||||
exit /b 2
|
||||
)
|
||||
popd
|
||||
set log_file="%~sf2"
|
||||
shift
|
||||
shift
|
||||
goto :verifyopt
|
||||
)
|
||||
echo Ignoring unidentified option: %~1 & shift
|
||||
goto :verifyopt
|
||||
|
||||
:compile
|
||||
REM option to force msvc, gcc or tcc
|
||||
if "%~1"=="-gcc" set force_gcc=1 & goto :gcc_strap
|
||||
if "%~2"=="-gcc" set force_gcc=1 & goto :gcc_strap
|
||||
if "%~1"=="-msvc" set force_msvc=1 & goto :msvc_strap
|
||||
if "%~2"=="-msvc" set force_msvc=1 & goto :msvc_strap
|
||||
if "%~1"=="-tcc" set force_tcc=1 & goto :tcc_strap
|
||||
if "%~2"=="-tcc" set force_tcc=1 & goto :tcc_strap
|
||||
if "%~1"=="-fresh_tcc" set force_tcc=1 & goto :fresh_tcc
|
||||
if "%~2"=="-fresh_tcc" set force_tcc=1 & goto :fresh_tcc
|
||||
|
||||
:gcc_strap
|
||||
:init
|
||||
echo.
|
||||
echo Attempting to build v.c with GCC...
|
||||
|
||||
where /q gcc
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
echo ^> GCC not found
|
||||
if "%force_gcc%" NEQ "" goto :error
|
||||
goto :msvc_strap
|
||||
del !log_file!>NUL 2>&1
|
||||
if !use_local! NEQ 1 (
|
||||
if exist "vc" (
|
||||
echo Updating vc...
|
||||
echo ^> Sync with remote https://github.com/vlang/vc.git
|
||||
call :buildcmd "cd vc" " "
|
||||
call :buildcmd "git pull --quiet" " "
|
||||
call :buildcmd "cd .." " "
|
||||
) else (
|
||||
echo Cloning vc...
|
||||
echo ^> Cloning from remote https://github.com/vlang/vc.git
|
||||
call :buildcmd "git clone --depth 1 --quiet https://github.com/vlang/vc.git" " "
|
||||
)
|
||||
)
|
||||
|
||||
gcc -std=c99 -municode -w -o v.exe .\vc\v_win.c>>%log_file% 2>>&1
|
||||
echo.
|
||||
echo Building V...
|
||||
|
||||
if !compiler_opt! == "clang" goto :clang_strap
|
||||
if !compiler_opt! == "gcc" goto :gcc_strap
|
||||
if !compiler_opt! == "msvc" goto :msvc_strap
|
||||
if !compiler_opt! == "tcc" goto :tcc_strap
|
||||
if !compiler_opt! == "fresh-tcc" goto :tcc_strap
|
||||
if !compiler_opt! == "" goto :gcc_strap
|
||||
|
||||
:clang_strap
|
||||
where /q clang
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
rem In most cases, compile errors happen because the version of GCC installed is too old
|
||||
gcc --version>>%log_file% 2>>&1
|
||||
echo ^> Clang not found
|
||||
if not !compiler_opt! == "" goto :error
|
||||
goto :gcc_strap
|
||||
)
|
||||
|
||||
set /a valid_cc=1
|
||||
|
||||
echo ^> Attempting to build v.c with Clang
|
||||
call :buildcmd "clang -std=c99 -municode -pedantic -w -o v.exe .\vc\v_win.c" " "
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
REM In most cases, compile errors happen because the version of Clang installed is too old
|
||||
clang --version>>!log_file! 2>>&1
|
||||
goto :compile_error
|
||||
)
|
||||
|
||||
echo ^> Compiling with .\v.exe self
|
||||
v.exe self>>%log_file% 2>>&1
|
||||
call :buildcmd "v.exe -cc clang self" " "
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
goto :success
|
||||
|
||||
:gcc_strap
|
||||
where /q gcc
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
echo ^> GCC not found
|
||||
if not !compiler_opt! == "" goto :error
|
||||
goto :msvc_strap
|
||||
)
|
||||
|
||||
set /a valid_cc=1
|
||||
|
||||
echo ^> Attempting to build v.c with GCC
|
||||
call :buildcmd "gcc -std=c99 -municode -w -o v.exe .\vc\v_win.c" " "
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
rem In most cases, compile errors happen because the version of GCC installed is too old
|
||||
gcc --version>>!log_file! 2>>&1
|
||||
goto :compile_error
|
||||
)
|
||||
|
||||
echo ^> Compiling with .\v.exe self
|
||||
call :buildcmd "v.exe self" " "
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
goto :success
|
||||
|
||||
:msvc_strap
|
||||
echo.
|
||||
echo Attempting to build v.c with MSVC...
|
||||
set VsWhereDir=%ProgramFiles(x86)%
|
||||
set HostArch=x64
|
||||
if "%PROCESSOR_ARCHITECTURE%" == "x86" (
|
||||
|
|
@ -82,10 +154,12 @@ if "%PROCESSOR_ARCHITECTURE%" == "x86" (
|
|||
|
||||
if not exist "%VsWhereDir%\Microsoft Visual Studio\Installer\vswhere.exe" (
|
||||
echo ^> MSVC not found
|
||||
if "%force_msvc%" NEQ "" goto :error
|
||||
if not !compiler_opt! == "" goto :error
|
||||
goto :tcc_strap
|
||||
)
|
||||
|
||||
set /a valid_cc=1
|
||||
|
||||
for /f "usebackq tokens=*" %%i in (`"%VsWhereDir%\Microsoft Visual Studio\Installer\vswhere.exe" -latest -prerelease -products * -requires Microsoft.VisualStudio.Component.VC.Tools.x86.x64 -property installationPath`) do (
|
||||
set InstallDir=%%i
|
||||
)
|
||||
|
|
@ -98,64 +172,57 @@ if exist "%InstallDir%\Common7\Tools\vsdevcmd.bat" (
|
|||
|
||||
set ObjFile=.v.c.obj
|
||||
|
||||
cl.exe /volatile:ms /Fo%ObjFile% /O2 /MD /D_VBOOTSTRAP vc\v_win.c user32.lib kernel32.lib advapi32.lib shell32.lib /link /nologo /out:v.exe /incremental:no>>%log_file% 2>>&1
|
||||
echo ^> Attempting to build v.c with MSVC
|
||||
call :buildcmd "cl.exe /volatile:ms /Fo%ObjFile% /O2 /MD /D_VBOOTSTRAP vc\v_win.c user32.lib kernel32.lib advapi32.lib shell32.lib /link /nologo /out:v.exe /incremental:no" " "
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
|
||||
echo ^> Compiling with .\v.exe self
|
||||
v.exe -cc msvc self>>%log_file% 2>>&1
|
||||
del %ObjFile%>>%log_file% 2>>&1
|
||||
call :buildcmd "v.exe -cc msvc self" " "
|
||||
del %ObjFile%>>!log_file! 2>>&1
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
goto :success
|
||||
|
||||
:fresh_tcc
|
||||
rd /s /q "%tcc_dir%"
|
||||
|
||||
:clone_tcc
|
||||
git clone --depth 1 --quiet "%tcc_url%" "%tcc_dir%"
|
||||
set cloned_tcc=1
|
||||
goto :tcc_strap
|
||||
|
||||
:tcc_strap
|
||||
echo.
|
||||
echo Attempting to build v.c with TCC...
|
||||
|
||||
where /q tcc
|
||||
if %ERRORLEVEL% NEQ 0 (
|
||||
if exist "%tcc_dir%" (
|
||||
set tcc_exe="%tcc_dir%\tcc.exe"
|
||||
) else if "%cloned_tcc%"=="" (
|
||||
echo ^> TCC not found
|
||||
echo ^> Downloading TCC from %tcc_url%
|
||||
goto :clone_tcc
|
||||
) else (
|
||||
echo ^> TCC not found, even after cloning %cloned_tcc%
|
||||
goto :error
|
||||
)
|
||||
if !compiler_opt! == "fresh-tcc" (
|
||||
echo ^> Clean TCC directory
|
||||
call :buildcmd "rd /s /q "%tcc_dir%">NUL 2>&1" " "
|
||||
set /a valid_cc=1
|
||||
) else if !compiler_opt! == "tcc" ( set /a valid_cc=1 )
|
||||
if not exist "%tcc_dir%" (
|
||||
echo ^> TCC not found
|
||||
echo ^> Downloading TCC from %tcc_url%
|
||||
call :buildcmd "git clone --depth 1 --quiet "%tcc_url%" "%tcc_dir%"" " "
|
||||
)
|
||||
pushd %tcc_dir% || (
|
||||
echo ^> TCC not found, even after cloning
|
||||
goto :error
|
||||
)
|
||||
popd
|
||||
set tcc_exe="%tcc_dir%\tcc.exe"
|
||||
) else (
|
||||
for /f "delims=" %%i in ('where tcc') do set tcc_exe=%%i
|
||||
for /f "delims=" %%i in ('where tcc') do set "tcc_exe=%%i"
|
||||
set /a valid_cc=1
|
||||
)
|
||||
|
||||
if exist "%tcc_dir%" (
|
||||
if "%cloned_tcc%"=="" (
|
||||
echo ^> Updating prebuilt TCC...
|
||||
pushd "%tcc_dir%"\
|
||||
git pull -q
|
||||
popd
|
||||
)
|
||||
)
|
||||
"%tcc_exe%" -std=c99 -municode -lws2_32 -lshell32 -ladvapi32 -bt10 -w -o v.exe vc\v_win.c
|
||||
echo ^> Updating prebuilt TCC...
|
||||
pushd "%tcc_dir%"\
|
||||
call :buildcmd "git pull -q" " "
|
||||
popd
|
||||
|
||||
echo ^> Attempting to build v.c with TCC
|
||||
call :buildcmd ""!tcc_exe!" -std=c99 -municode -lws2_32 -lshell32 -ladvapi32 -bt10 -w -o v.exe vc\v_win.c" " "
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
|
||||
echo ^> Compiling with .\v.exe self
|
||||
v.exe -cc "%tcc_exe%" self>>%log_file% 2>>&1
|
||||
call :buildcmd "v.exe -cc "!tcc_exe!" self" " "
|
||||
if %ERRORLEVEL% NEQ 0 goto :compile_error
|
||||
goto :success
|
||||
|
||||
:compile_error
|
||||
echo.
|
||||
echo.
|
||||
type %log_file%
|
||||
del %log_file%
|
||||
type !log_file!>NUL 2>&1
|
||||
goto :error
|
||||
|
||||
:error
|
||||
|
|
@ -167,22 +234,54 @@ exit /b 1
|
|||
:success
|
||||
echo ^> V built successfully!
|
||||
echo ^> To add V to your PATH, run `.\v.exe symlink`.
|
||||
del v_old.exe >>%log_file% 2>>&1
|
||||
del %log_file%
|
||||
if !valid_cc! EQU 0 (
|
||||
echo.
|
||||
echo WARNING: No C compiler was detected in your PATH. `tcc` was used temporarily
|
||||
echo to build V, but it may have some bugs and may not work in all cases.
|
||||
echo A more advanced C compiler like GCC or MSVC is recommended.
|
||||
echo https://github.com/vlang/v/wiki/Installing-a-C-compiler-on-Windows
|
||||
echo.
|
||||
)
|
||||
|
||||
del v_old.exe>>!log_file! 2>>&1
|
||||
del !log_file!
|
||||
|
||||
:version
|
||||
echo.
|
||||
echo | set /p="V version: "
|
||||
.\v.exe version
|
||||
if "%cloned_tcc%" NEQ "" (
|
||||
if "%force_tcc%" == "" (
|
||||
echo.
|
||||
echo WARNING: No C compiler was detected in your PATH. `tcc` was used temporarily
|
||||
echo to build V, but it may have some bugs and may not work in all cases.
|
||||
echo A more advanced C compiler like GCC or MSVC is recommended.
|
||||
echo https://github.com/vlang/v/wiki/Installing-a-C-compiler-on-Windows
|
||||
echo.
|
||||
)
|
||||
)
|
||||
|
||||
popd
|
||||
exit /b 0
|
||||
|
||||
:buildcmd
|
||||
if !verbose_log! EQU 1 (
|
||||
echo [Debug] %~1>>!log_file!
|
||||
echo %~2 %~1
|
||||
)
|
||||
%~1>>!log_file! 2>>&1
|
||||
exit /b %ERRORLEVEL%
|
||||
|
||||
:usage
|
||||
echo.
|
||||
echo Usage:
|
||||
echo make.bat [compiler] [options]
|
||||
echo.
|
||||
echo Compiler :
|
||||
echo -msvc ^| -gcc ^| -[fresh-]tcc ^| -clang Set C compiler
|
||||
echo.
|
||||
echo Options:
|
||||
echo -local Use the local vc repository without
|
||||
echo syncing with remote
|
||||
echo -logfile PATH Use the specified PATH as the log
|
||||
echo file
|
||||
echo -v ^| --verbose Output compilation commands to stdout
|
||||
echo -h ^| --help Display this help message and exit
|
||||
echo.
|
||||
echo Examples:
|
||||
echo make.bat -msvc
|
||||
echo make.bat -gcc --local --logpath output.log
|
||||
echo make.bat -fresh-tcc --local
|
||||
echo make.bat --help
|
||||
echo.
|
||||
echo Note: Any undefined options will be ignored
|
||||
exit /b 0
|
||||
|
|
|
|||
Loading…
Reference in New Issue