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

269
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
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
:init
echo.
del !log_file!>NUL 2>&1
if !use_local! NEQ 1 (
if exist "vc" ( if exist "vc" (
echo Updating vc... echo Updating vc...
cd vc echo ^> Sync with remote https://github.com/vlang/vc.git
git pull --quiet call :buildcmd "cd vc" " "
cd .. call :buildcmd "git pull --quiet" " "
call :buildcmd "cd .." " "
) else ( ) else (
echo Cloning vc... echo Cloning vc...
git clone --depth 1 --quiet https://github.com/vlang/vc echo ^> Cloning from remote https://github.com/vlang/vc.git
call :buildcmd "git clone --depth 1 --quiet https://github.com/vlang/vc.git" " "
)
) )
: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
echo. echo.
echo Attempting to build v.c with GCC... echo Building V...
where /q gcc 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 (
echo ^> GCC not found echo ^> Clang not found
if "%force_gcc%" NEQ "" goto :error if not !compiler_opt! == "" goto :error
goto :msvc_strap goto :gcc_strap
) )
gcc -std=c99 -municode -w -o v.exe .\vc\v_win.c>>%log_file% 2>>&1 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 ( if %ERRORLEVEL% NEQ 0 (
rem In most cases, compile errors happen because the version of GCC installed is too old REM In most cases, compile errors happen because the version of Clang installed is too old
gcc --version>>%log_file% 2>>&1 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" " "
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 ^> TCC not found
echo ^> Downloading TCC from %tcc_url% echo ^> Downloading TCC from %tcc_url%
goto :clone_tcc call :buildcmd "git clone --depth 1 --quiet "%tcc_url%" "%tcc_dir%"" " "
) else ( )
echo ^> TCC not found, even after cloning %cloned_tcc% pushd %tcc_dir% || (
echo ^> TCC not found, even after cloning
goto :error 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%" (
if "%cloned_tcc%"=="" (
echo ^> Updating prebuilt TCC... echo ^> Updating prebuilt TCC...
pushd "%tcc_dir%"\ pushd "%tcc_dir%"\
git pull -q call :buildcmd "git pull -q" " "
popd popd
)
) echo ^> Attempting to build v.c with TCC
"%tcc_exe%" -std=c99 -municode -lws2_32 -lshell32 -ladvapi32 -bt10 -w -o v.exe vc\v_win.c 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 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,15 +234,7 @@ 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%
:version
echo.
echo | set /p="V version: "
.\v.exe version
if "%cloned_tcc%" NEQ "" (
if "%force_tcc%" == "" (
echo. echo.
echo WARNING: No C compiler was detected in your PATH. `tcc` was used temporarily 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 to build V, but it may have some bugs and may not work in all cases.
@ -183,6 +242,46 @@ if "%cloned_tcc%" NEQ "" (
echo https://github.com/vlang/v/wiki/Installing-a-C-compiler-on-Windows echo https://github.com/vlang/v/wiki/Installing-a-C-compiler-on-Windows
echo. echo.
) )
)
del v_old.exe>>!log_file! 2>>&1
del !log_file!
:version
echo.
echo | set /p="V version: "
.\v.exe version
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