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 38 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
49 rem [c:\dart_bleeding\dart-repo.9\dart\out\ReleaseIA32\dart-sdk] | 49 rem [c:\dart_bleeding\dart-repo.9\dart\out\ReleaseIA32\dart-sdk] |
50 rem | 50 rem |
51 rem So in the output of 'dir /a:l "targetdir"' we are looking for a filename | 51 rem So in the output of 'dir /a:l "targetdir"' we are looking for a filename |
52 rem surrounded by right angle bracket and left square bracket. Once we get | 52 rem surrounded by right angle bracket and left square bracket. Once we get |
53 rem the filename, which is name of the link, we recursively follow that. | 53 rem the filename, which is name of the link, we recursively follow that. |
54 :follow_links | 54 :follow_links |
55 setlocal | 55 setlocal |
56 for %%i in (%1) do set result=%%~fi | 56 for %%i in (%1) do set result=%%~fi |
57 set current= | 57 set current= |
58 for /f "usebackq tokens=2 delims=[]" %%i in (`dir /a:l "%~dp1" 2^>nul ^ | 58 for /f "usebackq tokens=2 delims=[]" %%i in (`dir /a:l "%~dp1" 2^>nul ^ |
59 ^| find "> %~n1 ["`) do ( | 59 ^| find "> %~n1 [" 2^>nul`) do
( |
60 set current=%%i | 60 set current=%%i |
61 ) | 61 ) |
62 if not "%current%"=="" call :follow_links "%current%", result | 62 if not "%current%"=="" call :follow_links "%current%", result |
63 endlocal & set %~2=%result% | 63 endlocal & set %~2=%result% |
64 goto :eof | 64 goto :eof |
65 | 65 |
66 :end | 66 :end |
OLD | NEW |