OLD | NEW |
1 @echo off | 1 @echo off |
2 REM Copyright (c) 2013, the Dart project authors. Please see the AUTHORS file | 2 REM Copyright (c) 2013, the Dart project authors. Please see the AUTHORS file |
3 REM for details. All rights reserved. Use of this source code is governed by a | 3 REM for details. All rights reserved. Use of this source code is governed by a |
4 REM BSD-style license that can be found in the LICENSE file. | 4 REM BSD-style license that can be found in the LICENSE file. |
5 | 5 |
6 setlocal | 6 setlocal |
7 rem Handle the case where dart-sdk/bin has been symlinked to. | 7 rem Handle the case where dart-sdk/bin has been symlinked to. |
8 set DIR_NAME_WITH_SLASH=%~dp0 | 8 set DIR_NAME_WITH_SLASH=%~dp0 |
9 set DIR_NAME=%DIR_NAME_WITH_SLASH:~0,-1%% | 9 set DIR_NAME=%DIR_NAME_WITH_SLASH:~0,-1%% |
10 call :follow_links "%DIR_NAME%", RETURNED_BIN_DIR | 10 call :follow_links "%DIR_NAME%", RETURNED_BIN_DIR |
(...skipping 14 matching lines...) Expand all Loading... |
25 "%DART%" "%SNAPSHOT%" "%SDK_ARG%" %* | 25 "%DART%" "%SNAPSHOT%" "%SDK_ARG%" %* |
26 | 26 |
27 endlocal | 27 endlocal |
28 | 28 |
29 exit /b %errorlevel% | 29 exit /b %errorlevel% |
30 | 30 |
31 rem Follow the symbolic links (junctions points) using `dir to determine the | 31 rem Follow the symbolic links (junctions points) using `dir to determine the |
32 rem canonical path. Output with a link looks something like this | 32 rem canonical path. Output with a link looks something like this |
33 rem | 33 rem |
34 rem 01/03/2013 10:11 PM <JUNCTION> abc def | 34 rem 01/03/2013 10:11 PM <JUNCTION> abc def |
35 rem [c:\dart_bleeding\dart-repo.9\dart\build\ReleaseIA32\dart-sdk] | 35 rem [c:\dart_bleeding\dart-repo.9\dart\out\ReleaseIA32\dart-sdk] |
36 rem | 36 rem |
37 rem So in the output of 'dir /a:l "targetdir"' we are looking for a filename | 37 rem So in the output of 'dir /a:l "targetdir"' we are looking for a filename |
38 rem surrounded by right angle bracket and left square bracket. Once we get | 38 rem surrounded by right angle bracket and left square bracket. Once we get |
39 rem the filename, which is name of the link, we recursively follow that. | 39 rem the filename, which is name of the link, we recursively follow that. |
40 :follow_links | 40 :follow_links |
41 setlocal | 41 setlocal |
42 for %%i in (%1) do set result=%%~fi | 42 for %%i in (%1) do set result=%%~fi |
43 set current= | 43 set current= |
44 for /f "usebackq tokens=2 delims=[]" %%i in (`dir /a:l "%~dp1" 2^>nul ^ | 44 for /f "usebackq tokens=2 delims=[]" %%i in (`dir /a:l "%~dp1" 2^>nul ^ |
45 ^| find "> %~n1 ["`) do ( | 45 ^| find "> %~n1 ["`) do ( |
46 set current=%%i | 46 set current=%%i |
47 ) | 47 ) |
48 if not "%current%"=="" call :follow_links "%current%", result | 48 if not "%current%"=="" call :follow_links "%current%", result |
49 endlocal & set %~2=%result% | 49 endlocal & set %~2=%result% |
50 goto :eof | 50 goto :eof |
51 | 51 |
52 :end | 52 :end |
OLD | NEW |