vieter-v
/
v
2
0
Fork 0
Code Issues Pull Requests Releases Activity

make.bat: refactor for better param parsing and usage help (#6893)

pull/6753/head
heronwr 2020-11-21 06:02:03 -05:00 committed by GitHub
parent 92d3cff957
commit 6b89249c6d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 201 additions and 102 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

303
make.bat
View File

@ -1,77 +1,149 @@
@echo off @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 REM option variables
set tcc_url=https://github.com/vlang/tccbin_win 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" set tcc_dir="%~dp0thirdparty\tcc"
REM let a particular environment specify their own tcc REM let a particular environment specify their own tcc
if "%TCC_GIT%" =="" goto :init if /I not "%TCC_GIT%" == "" (
set tcc_url="%TCC_GIT%" 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=
pushd %~dp0 pushd %~dp0
if "%~1"=="-local" goto :compile :verifyopt
if "%~2"=="-local" goto :compile REM end at EOL
if ["%~1"] == [""] goto :init
if exist "vc" ( REM help option
echo Updating vc... if "%~1" == "-h" call :usage& exit /b %ERRORLEVEL%
cd vc if "%~1" == "--help" call :usage& exit /b %ERRORLEVEL%
git pull --quiet
cd .. REM compiler option
) else ( if "%~1" == "-gcc" set compiler_opt="gcc"& shift& goto :verifyopt
echo Cloning vc... if "%~1" == "-msvc" set compiler_opt="msvc"& shift& goto :verifyopt
git clone --depth 1 --quiet https://github.com/vlang/vc 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 :init
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
echo. echo.
echo Attempting to build v.c with GCC... del !log_file!>NUL 2>&1
if !use_local! NEQ 1 (
where /q gcc if exist "vc" (
if %ERRORLEVEL% NEQ 0 ( echo Updating vc...
echo ^> GCC not found echo ^> Sync with remote https://github.com/vlang/vc.git
if "%force_gcc%" NEQ "" goto :error call :buildcmd "cd vc" " "
goto :msvc_strap 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 ( if %ERRORLEVEL% NEQ 0 (
rem In most cases, compile errors happen because the version of GCC installed is too old echo ^> Clang not found
gcc --version>>%log_file% 2>>&1 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 goto :compile_error
) )
echo ^> Compiling with .\v.exe self 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 if %ERRORLEVEL% NEQ 0 goto :compile_error
goto :success goto :success
:msvc_strap :msvc_strap
echo.
echo Attempting to build v.c with MSVC...
set VsWhereDir=%ProgramFiles(x86)% set VsWhereDir=%ProgramFiles(x86)%
set HostArch=x64 set HostArch=x64
if "%PROCESSOR_ARCHITECTURE%" == "x86" ( if "%PROCESSOR_ARCHITECTURE%" == "x86" (
@ -82,10 +154,12 @@ if "%PROCESSOR_ARCHITECTURE%" == "x86" (
if not exist "%VsWhereDir%\Microsoft Visual Studio\Installer\vswhere.exe" ( if not exist "%VsWhereDir%\Microsoft Visual Studio\Installer\vswhere.exe" (
echo ^> MSVC not found echo ^> MSVC not found
if "%force_msvc%" NEQ "" goto :error if not !compiler_opt! == "" goto :error
goto :tcc_strap 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 ( 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 set InstallDir=%%i
) )
@ -98,64 +172,57 @@ if exist "%InstallDir%\Common7\Tools\vsdevcmd.bat" (
set ObjFile=.v.c.obj 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 if %ERRORLEVEL% NEQ 0 goto :compile_error
echo ^> Compiling with .\v.exe self echo ^> Compiling with .\v.exe self
v.exe -cc msvc self>>%log_file% 2>>&1 call :buildcmd "v.exe -cc msvc self" " "
del %ObjFile%>>%log_file% 2>>&1 del %ObjFile%>>!log_file! 2>>&1
if %ERRORLEVEL% NEQ 0 goto :compile_error if %ERRORLEVEL% NEQ 0 goto :compile_error
goto :success 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 :tcc_strap
echo.
echo Attempting to build v.c with TCC...
where /q tcc where /q tcc
if %ERRORLEVEL% NEQ 0 ( if %ERRORLEVEL% NEQ 0 (
if exist "%tcc_dir%" ( if !compiler_opt! == "fresh-tcc" (
set tcc_exe="%tcc_dir%\tcc.exe" echo ^> Clean TCC directory
) else if "%cloned_tcc%"=="" ( call :buildcmd "rd /s /q "%tcc_dir%">NUL 2>&1" " "
echo ^> TCC not found set /a valid_cc=1
echo ^> Downloading TCC from %tcc_url% ) else if !compiler_opt! == "tcc" ( set /a valid_cc=1 )
goto :clone_tcc if not exist "%tcc_dir%" (
) else ( echo ^> TCC not found
echo ^> TCC not found, even after cloning %cloned_tcc% echo ^> Downloading TCC from %tcc_url%
goto :error 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 ( ) 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%" ( echo ^> Updating prebuilt TCC...
if "%cloned_tcc%"=="" ( pushd "%tcc_dir%"\
echo ^> Updating prebuilt TCC... call :buildcmd "git pull -q" " "
pushd "%tcc_dir%"\ popd
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" " "
)
"%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 if %ERRORLEVEL% NEQ 0 goto :compile_error
echo ^> Compiling with .\v.exe self 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 if %ERRORLEVEL% NEQ 0 goto :compile_error
goto :success goto :success
:compile_error :compile_error
echo. echo.
echo. type !log_file!>NUL 2>&1
type %log_file%
del %log_file%
goto :error goto :error
:error :error
@ -167,22 +234,54 @@ exit /b 1
:success :success
echo ^> V built successfully! echo ^> V built successfully!
echo ^> To add V to your PATH, run `.\v.exe symlink`. echo ^> To add V to your PATH, run `.\v.exe symlink`.
del v_old.exe >>%log_file% 2>>&1 if !valid_cc! EQU 0 (
del %log_file% 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 :version
echo. echo.
echo | set /p="V version: " echo | set /p="V version: "
.\v.exe 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 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