[megaloman]

Не думаю, что эта задача может быть надежно реализована в CMD из-за спецсимволов. Попробуйте формальное решение:

Код:

@Echo Off
cls
>nul Chcp  1251
	Set "FileIn=Z:\Box_In\JtoS.txt"

	FOR /F "usebackq delims=" %%s In ("%FileIn%") DO (
		FOR /F "usebackq tokens=3* delims= " %%a In (`Echo "%%s"^|Find /I "Содержимое папки"`) DO (
			Set "Fold=%%~b"
			Call Set "Fold=%%Fold:~0,-1%%"
		)
		FOR /F "usebackq tokens=3* delims= " %%a In (`Echo "%%s"^|Find /I "<JUNCTION>"`) DO (
			Call Set "Junk=%%Fold%%\%%~b"
			Call Set "Junk=%%Junk:~0,-1%%"
			Call Set "Junk=%%Junk: [\??\=[%%"
			FOR /F "usebackq tokens=1,2 delims=[]" %%i In (`Call Echo %%Junk%%`) DO (
rem				Set "L=%%i"
rem				Set "T=%%j"
rem				Call Echo "%%T%%"  &Call Echo "%%L%%"
				Call :Rezult "%%j" "%%i"
			)
		)
	)
pause
Exit /B

:Rezult
	Echo %1
	Echo %2
Exit /B

Наверное, удобнее выделенными строками пользоваться внутри процедуры. Я заремил использование переменных в Echo внутри цикла - имхо, это не удобно

[DJ Mogarych]

Powershell:

Код:

$strNum = ((gc "D:\temp\JtoS.txt" -OutVariable txt |sls 'Содержимое папки').LineNumber|% {$_ - 1})
$strNum += $txt.count
$c = 0

$report = @()
$strNum |% {
$start = $strNum[$c]
$end = $strNum[$c+1] - 1; if ($end -eq -1) {$end = $txt.count}
$piece = ($txt)[$start..$end]
    ($piece) -match '<junction>' |% {
        $obj = [pscustomobject]@{
        t = $_ -replace '.*\\\?\?\\' -replace '\]'
        l = (($piece) -match 'Содержимое папки' -replace '.*папки').trim() + '\' + `
        ($_ -replace '.*<junction>\s+' -replace '\s+\[.*').trim()
        }
    $report += $obj
    }
$c = $c+1
}

Код:

$report

t                                                                 l                                                                   
-                                                                 -                                                                   
H:\Фонотека\Jazz - fusion\Baldauf Rudiger                         H:\Слушать\Слушать\ Инструменты\Труба (trumpet)\Baldauf Rudiger     
h:\Фонотека\Jazz\Beiderbecke Leon Bix                             H:\Слушать\Слушать\ Инструменты\Труба (trumpet)\Beiderbecke Leon Bix
H:\Фонотека\Jazz - avant-guard\Lloyd Charles                      H:\Слушать\Слушать\Modern jazz\Lloyd Charles                        
H:\Фонотека\Jazz - smooth\Aaron Blake\Blake Aaron - Desire (2007) H:\Слушать\Слушать\Smooth\Blake Aaron - Desire (2007)               
H:\Фонотека\Jazz - smooth\ Various\Club des Belugas - Swop (2008) H:\Слушать\Слушать\Smooth\Club des Belugas - Swop (2008)

Бикс Бейдербек - такое сейчас редко увидишь в фонотеке...

[megaloman]

HankHank, Не думаю, что хорошая идея копаться в файле. А почему бы сразу не обрабатывать вывод Dir?

Код:

@Echo Off
cls
>nul Chcp  1251
	Set "BoxIn=H:\"
	
	FOR /F "usebackq delims=" %%d In (`2^>nul Dir "%BoxIn%" /AL /S /B`) DO (
		FOR /F "usebackq tokens=1,2 delims=[]" %%i In (`2^>nul Dir /AL "%BoxIn%%%~nxd*.*"^|Find /I "<JUNCTION>"`) DO (
			Echo.
		        Echo "%%d"
			Set "L=%%j"
			Call Set "L=%%L:\??\=%%"
			Call Echo "%%L%%"
		)
	)
pause
Exit /B

Полноценно не тестировал,

[HankHank]

Код для скрипта может быть проще, если использовать команду

DIR /AL /B /S H:\

Тогда получим чистые строки с полными путями к ссылкам:

Код:

H:\Слушать\Слушать\Albright Gerald
H:\Слушать\Слушать\Alex Rostotsky - Time when fish think of the past (2004)
H:\Слушать\Слушать\Dave Brubeck - Ken Burns Jazz (Columbia - Legacy Records) 2000
H:\Слушать\Слушать\Dino Saluzzi - El Encuentro (2010) [Flac]
H:\Слушать\Слушать\Modern Jazz Quartet - Live At The Lighthouse (MFSL MFCD 827) (1967)
…

А, еcли вызвать по ссылке FSUTIL, то получим список строк, в котором нас интересует “Print Name:” - это и будет целевой объект.

Например:

FSUTIL reparsepoint query “H:\Слушать\Слушать\Alex Rostotsky - Time when fish think of the past (2004)”

Код:

Reparse Tag Value : 0xa0000003
Tag value: Microsoft
Tag value: Name Surrogate
Tag value: Mount Point
Substitue Name offset: 0
Substitue Name length: 184
Print Name offset:     186
Print Name Length:     176
Substitute Name:       \??\h:\Фонотека\Jazz\Rostotsky Alex\Alex Rostotsky - Time when fish think of the past (2004)
Print Name:            h:\Фонотека\Jazz\Rostotsky Alex\Alex Rostotsky - Time when fish think of the past (2004)
…

Таким образом, проблемы со спецсимволами серьёзно сокращаются.

Мне кажется, при таком раскладе шаблон для CMD вполне должен прокатить.

[HankHank]

Не думаю, что хорошая идея копаться в файле. А почему бы сразу не обрабатывать вывод Dir? »

Идея хорошая по причине того, что вывести простыню со всеми файлами можно всего один раз.
После чего брать из файла мелкие порции и отладить скрипт. Засада ожидается с русскими символами и спецсимволами.
А уже большими частями обработать всё оставшееся безобразие.

[megaloman]

Идея хорошая по причине того, что вывести простыню со всеми файлами можно всего один раз. После чего брать из файла мелкие порции и отладить скрипт. »

Тут уж в огороде бузина а в Киеве дядька: отлаживаем скрипт, который удобно отлаживать, а эффективно использовать будем другой, неотлаженный.
Берите скрипт с непосредственной обработкой Dir и натравливайте его на небольшую папку.

[HankHank]

Берите скрипт с непосредственной обработкой Dir и натравливайте его на небольшую папку »

Тоже вариант.
Только обходить вручную весь диск - не лучшая идея.
Плоская "простыня" кажется удобнее.

[megaloman]

Только обходить вручную весь диск - не лучшая идея. »

Не обходите. Укажите, для отладки, для Dir папочку, например в моём варианте:

Set "BoxIn=H:\Слушать\Слушать\Modern jazz\"
или более обьемную:
Set "BoxIn=H:\Слушать\Слушать\"

и добейтесь в отладке полного счастья.
Но отлаживать по любому надо скрипт, который собрались применять.

[HankHank]

У меня начальные познания о командных файлах. Но CALL-оператор, вроде, вызывает внешний комфайл или передаёт управление внутри того же файла.
Подскажите, в чём фишка употребления CALL в сочетании с другими операторами типа:

Call Set "Junk=%%Junk:~0,-1%%" Call Echo "%%T%%" &Call Echo "%%L%%" »

?