mirror of
https://github.com/SSCLI/sscli_20021101
synced 2026-06-08 12:28:57 +00:00
yallie
141 lines
3.8 KiB
Batchfile
141 lines
3.8 KiB
Batchfile
@if "%_echo%"=="" echo off
|
|
REM ==++==
|
|
REM
|
|
REM
|
|
REM Copyright (c) 2002 Microsoft Corporation. All rights reserved.
|
|
REM
|
|
REM The use and distribution terms for this software are contained in the file
|
|
REM named license.txt, which can be found in the root of this distribution.
|
|
REM By using this software in any fashion, you are agreeing to be bound by the
|
|
REM terms of this license.
|
|
REM
|
|
REM You must not remove this notice, or any other, from this software.
|
|
REM
|
|
REM
|
|
REM ==--==
|
|
|
|
REM Check to to see if MSVCDir is set
|
|
IF "%MSVCDir%"=="" for /f "usebackq delims=," %%i in ('%VS71COMNTOOLS%') do call :TRYSETMSVC "%%~i"
|
|
IF "%MSVCDir%"=="" for /f "usebackq delims=," %%i in ('%VSCOMNTOOLS%') do call :TRYSETMSVC "%%~i"
|
|
rem IF "%MSVCDir%"=="" call :TRYSETMSVC "C:\Program Files\Microsoft Visual Studio .Net 2003\Common7\Tools\"
|
|
rem IF "%MSVCDir%"=="" call :TRYSETMSVC "C:\Program Files\Microsoft Visual Studio .Net\Common7\Tools\"
|
|
IF "%MSVCDir%"=="" goto MSVCDirNotSet
|
|
|
|
REM Try and determine if Perl is installed.
|
|
perl -v >NUL: 2>NUL:
|
|
if ERRORLEVEL 1 goto NoPerlInstalled
|
|
|
|
REM Try and setup the PERLLIB environment variable
|
|
if "%PERLLIB%"=="" for %%i in (perl.exe) do set PERLLIB=%%~dp$PATH:i..\lib
|
|
if "%PERLLIB%"=="" goto PerlLibDirNotSet
|
|
if "%PERLLIB%"=="..\lib" goto PerlLibDirNotSet
|
|
|
|
REM Expand the PERLLIB environment variable
|
|
Call :FullPath %PERLLIB%
|
|
set PERLLIB=%RESULT%
|
|
if "%PERLLIB%"=="" goto PerlLibDirNotSet
|
|
|
|
REM Figure out the path to the current directory
|
|
call :ComputeBase %~f0
|
|
set ROTOR_DIR=%RESULT%
|
|
|
|
if not "%ROTOR_DIR%"=="%ROTOR_DIR: =%" goto SpaceInPath
|
|
|
|
REM Verify that there's no high characters in the path
|
|
perl -e "exit 1 if '%ROTOR_DIR%' =~ /[\x80-\xff]/;"
|
|
if ERRORLEVEL 1 goto NoHighBitCharacters
|
|
|
|
REM Setup the destination directory for the build if one isn't set already
|
|
if "%_URTTARGET%"=="" set _URTTARGET=%ROTOR_DIR%\build
|
|
|
|
if "%DNAROOT%"=="" set dnaroot=%ROTOR_DIR%\fx
|
|
|
|
REM Setup Rotor Enviroment variables used by rotorenv
|
|
set ROTOR=1
|
|
set FEATURE_PAL_VC7=1
|
|
set CSC_NO_DOC=1
|
|
|
|
REM Call corenv to setup the cor build environment
|
|
if "%1"=="" (
|
|
call %ROTOR_DIR%\clr\bin\rotorenv fastchecked
|
|
) else (
|
|
call %ROTOR_DIR%\clr\bin\rotorenv %*
|
|
)
|
|
if ERRORLEVEL 1 goto DisplayError
|
|
|
|
goto Done
|
|
|
|
REM ------------------------------------------
|
|
REM Expand a string to a full path
|
|
REM ------------------------------------------
|
|
:FullPath
|
|
set RESULT=%~f1
|
|
goto :EOF
|
|
|
|
REM ------------------------------------------
|
|
REM Compute the current directory
|
|
REM given a path to this batch script.
|
|
REM ------------------------------------------
|
|
:ComputeBase
|
|
set RESULT=%~dp1
|
|
REM Remove the trailing \
|
|
set RESULT=%RESULT:~0,-1%
|
|
Call :FullPath %RESULT%
|
|
goto :EOF
|
|
|
|
REM ------------------------------------------
|
|
REM Check if the file vsvars32.bat exists at
|
|
REM the specified path and if it does, call it.
|
|
REM The supplied path may or may not be wrapped
|
|
REM in "", so we unconditionally strip them then
|
|
REM add them under our own control.
|
|
REM ------------------------------------------
|
|
:TRYSETMSVC
|
|
IF NOT "%~1" == "" (
|
|
IF EXIST "%~1\vsvars32.bat" call "%~1\vsvars32.bat"
|
|
)
|
|
goto :EOF
|
|
|
|
:MSVCDirNotSet
|
|
echo.
|
|
echo *** Error ***
|
|
echo MSVCDir not defined. VC++ environment variables must be set before executing.
|
|
echo.
|
|
exit /B 1
|
|
|
|
:NoPerlInstalled
|
|
echo.
|
|
echo *** Error ***
|
|
echo Perl does not appear to be installed. Perl.exe failed to execute.
|
|
echo Please ensure Perl is installed and can be found in the PATH.
|
|
exit /B 1
|
|
|
|
:PerlLibDirNotSet
|
|
echo.
|
|
echo *** Error ***
|
|
echo PERLLIB not defined. Make sure you have Perl correctly installed and configured.
|
|
echo.
|
|
exit /B 1
|
|
|
|
:SpaceInPath
|
|
echo.
|
|
echo *** Error ***
|
|
echo You cannot have spaces in the path to the SSCLI directory.
|
|
echo.
|
|
exit /B 1
|
|
|
|
:NoHighBitCharacters
|
|
echo.
|
|
echo *** Error ***
|
|
echo You cannot have high-bit characters in the path to the SSCLI directory.
|
|
echo.
|
|
exit /B 1
|
|
|
|
:DisplayError
|
|
echo.
|
|
echo *** Error while running env.bat.
|
|
exit /B 1
|
|
|
|
:Done
|
|
exit /B 0
|