Поиск дубликатов папок

@Bazaroff · Регистрация: 29.05.2011

Студворк — интернет-сервис помощи студентам

Как осуществить?
Вот есть какой-то локализованный массив папок. Как узнать есть ли среди них идентичные по своему содержанию, и указать какие.
Вроде TotalCommander напрашивается. Да никак не придумаю как его можно приспособить для этого.(

YuS_2 · 04.02.2021, 15:19

Сообщение от Bazaroff

А она стоит по-умолчанию оказывается.

Хм-м-м, где?
Скрипт, который Вы запускали, явно сохранен не в UTF-8, иначе кракозябр в выданной ошибке не было бы...

Добавлено через 4 минуты
Bazaroff, проверьте наличие BOM, т.к. powershell v5.1, без него может не понять, что это UTF-8. В powershell v7, этой проблемы уже нет, в смысле наличие BOM не имеет значения.

@Bazaroff · 04.02.2021, 15:22 **[ТС]**

Сообщение от YuS_2

где?

Использую стандартный Блокнот.

@Bazaroff · 04.02.2021, 15:24 **[ТС]**

Сообщение от YuS_2

наличие BOM

Простите мне мою необразованность. Подробнее можно?

@alhaos · 04.02.2021, 15:29

DirComp.txt точно тот файл проверяете?

YuS_2 · 04.02.2021, 15:29

Сообщение от Bazaroff

Использую стандартный Блокнот.

Вот здесь, на картинке, Вы показываете открытый в блокноте файл с расширением .txt - а запускали какой файл?

Сообщение от Bazaroff

Подробнее можно?

BOM

@Bazaroff · 04.02.2021, 15:37 **[ТС]**

Сообщение от alhaos

DirComp.txt точно тот файл проверяете?

Абсолютно точно!

Добавлено через 1 минуту

Сообщение от YuS_2

Вот здесь, на картинке, Вы показываете открытый в блокноте файл с расширением .txt - а запускали какой файл?

Затем жму "Сохранить как"->"Все файлы", присваиваю расширение .ps1.

Добавлено через 2 минуты

Сообщение от YuS_2

BOM

Так а как проверить его наличие, и в случае отсутствия впихнуть его туда?

@volodin661 · 04.02.2021, 15:42

YuS_2,

чтобы избавиться от неизбежных вопросов, где же Бом и его коллега Бим,
я не стал настаивать на кодировке UTF-8 в качестве основной ))

a замечание про возможные пустые директории было дельным.

Поэтому:

dircomp.ps1

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
$dirs = gci C:/USERS/BAZAROFF/DESKTOP/ПРОЕКТЫ/МУЗЫКА -dir -rec
 
for ($i = 0; $i -lt $dirs.count; $i++) {
 
    for ($j = 0; $j -lt $dirs.count; $j++) {
 
        if ($i -lt $j ) {
 
            $dirA = gci $dirs[$i]
            $dirB = gci $dirs[$j]
            if ( $dirA.count -eq $dirB.count -and $dirA.count -ne 0 ) {
 
                $o = Compare-Object $dirA $dirB -Property Name -IncludeEqual -ExcludeDifferent 
                if ($dirA.count -eq $o.count ) {
         
                    "{0} == {1} (total {2} same files)" -f $dirs[$i], $dirs[$j], $o.count
                }
            }
        }
    }
}

PS:
Версия powershell 5.1
кодировка dircomp.ps1 на выбор: ANSI(CP1251), UTF-8 with BOM, UNICODE

@Bazaroff · 04.02.2021, 16:17 **[ТС]**

Ух жесть!

Документ Microsoft Word.docx

@volodin661 · 04.02.2021, 16:35

Bazaroff,

Сообщение от volodin661

тыканье мышкой из Windows Explorer - это как правило очень плохой способ запуска консольных программ;
можешь в этом убедиться сам.

вот ты и убедился

@Bazaroff · 04.02.2021, 18:34 **[ТС]**

volodin661, не, я не мышкой! В консоли PowerShell. (запуск от админа)
Текущая папка по-умолчанию System32.
Ввожу C:\Users\Bazaroff\Desktop\Проекты\Музыка \dircomp.ps1 (файл .ps1 находится там, кодировка ANSI), тыкаю Enter.

Добавлено через 1 час 38 минут
Господа, а может эту задачу можно решить как-то иначе?
Скажем ТоталКоммандеру дать там фильтр, задание, макрос... чтобы он выделил папки, размеры которых встречаются более одного раза. Типо того.
Таких совпадений будет немного - дальше руками посмотрю.

@volodin661 · 04.02.2021, 18:59

dircomp.ps1

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
set-location  C:/USERS/BAZAROFF/DESKTOP/ПРОЕКТЫ/МУЗЫКА
$dirs = gci * -dir -rec
 
for ($i = 0; $i -lt $dirs.count; $i++) {
 
    for ($j = 0; $j -lt $dirs.count; $j++) {
 
        if ($i -lt $j ) {
 
            $dirA = gci $dirs[$i]
            $dirB = gci $dirs[$j]
            if ( $dirA.count -eq $dirB.count -and $dirA.count -ne 0 ) {
 
                $o = Compare-Object $dirA $dirB -Property Name -IncludeEqual -ExcludeDifferent 
                if ($dirA.count -eq $o.count ) {
         
                    "{0} == {1} (total {2} same files)" -f $dirs[$i], $dirs[$j], $o.count
                }
            }
        }
    }
}

Добавлено через 11 минут
Bazaroff, работать-то всё конечно будет, но толку, если ты и не пытаешься понять что к чему и зачем ?

YuS_2 · 04.02.2021, 19:28

Сообщение от volodin661

$dirs = gci * -dir -rec

тут, рекурсия - излишество, наверное, т.к.:

Сообщение от Bazaroff

все папки находятся на одном уровне. У одного родителя. В них кроме .mp3 нет ничего. Глубже папок нет.

и да, чтобы не было необходимости переназначать текущий каталог (ну, мало ли, вдруг, в дальнейшем захочется скрипт переместить, да ещё код какой-либо добавить...), я бы сделал так:

PowerShell
1
2
3
4
...
             $dirA = gci $dirs.fullname[$i] -file
             $dirB = gci $dirs.fullname[$j] -file
...

- этого, было бы достаточно... да и заодно, случайно затесавшиеся подкаталоги на счетчик не повлияют...

@Bazaroff · 04.02.2021, 19:30 **[ТС]**

volodin661, так я же пытаюсь решить сиюминутную задачу. Пока я не ставил целью освоить PowerShell.
Вот если будет скриптик - я его сохраню у себя с описанием для чего он мне и как с ним управляться.

YuS_2 · 04.02.2021, 19:34

Не по теме:

Сообщение от Bazaroff

Господа, а может эту задачу можно решить как-то иначе?

"Нет уж, доктор сказал в морг, значит в морг" :)

Добавлено через 1 минуту

Не по теме:

Сообщение от Bazaroff

Пока я не ставил целью освоить PowerShell.

Это пока... потом захочется большего... придется таки изучать... пригодится, в общем.

@Bazaroff · 04.02.2021, 19:43 **[ТС]**

Сообщение от YuS_2

Это пока... потом захочется большего... придется таки изучать... пригодится, в общем.

Не отрицаю.

FlasherX · 04.02.2021, 20:22

Сообщение от Bazaroff

чтобы он выделил папки, размеры которых встречаются более одного раза.

Вперемешку? А потом ручками (Ctrl+⇆) совпадающие выискивать?
ЗЫ: В ТС фигово, что только дубликаты файлов ищутся, иначе можно было бы и скрипт под плаг сбацать.

@volodin661 · 04.02.2021, 23:00

вот тест дерево

testgentree.ps1

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
new-item -itemtype directory MUSIC
set-location MUSIC
 
new-item -itemtype directory   "Lumbricidae"
new-item -itemtype file -path  "Lumbricidae" -name "Обыкновенный дождевой червяк" -value  "Lumbricus agricola"
new-item -itemtype file -path  "Lumbricidae" -name "Пестрый дождевик"             -value  "L. foetidus"  
new-item -itemtype file -path  "Lumbricidae" -name "Проворный дождевик"           -value  "L. puter"
new-item -itemtype file -path  "Lumbricidae" -name "Зеленоватый дождевик"         -value  "L. chloroticus"
 
new-item -itemtype directory   "Hirudinea"
new-item -itemtype file -path  "Hirudinea"   -name "Медицинская пиявка"                  -value "Hirudo medicinalis"
new-item -itemtype file -path  "Hirudinea"   -name "Обыкновенная присосница"             -value "Nephelis vulgaris"
new-item -itemtype file -path  "Hirudinea"   -name "Аптекарская, или венгерская, пиявка" -value "Hirudo officinalis"
new-item -itemtype file -path  "Hirudinea"   -name "Берберийская пиявка"                 -value "Н. troctina"
new-item -itemtype file -path  "Hirudinea"   -name "Зернистая, или индийская, пиявка"    -value "Н. granulosa"
new-item -itemtype file -path  "Hirudinea"   -name "Конская пиявка"                      -value "Haemopis vorax"
new-item -itemtype file -path  "Hirudinea"   -name "Тонкомордая пиявица"                 -value "Alacostomum gulo"
new-item -itemtype file -path  "Hirudinea"   -name "Цейлонская пиявка"                   -value "Hirudo ceylonien"
 
new-item -itemtype directory  "Nemathelminthes"
new-item -itemtype file -path "Nemathelminthes" -name "Скребень-великан"         -value "Е. gigas"
new-item -itemtype file -path "Nemathelminthes" -name "Рыбный скребень"          -value "Е. proteus"
new-item -itemtype file -path "Nemathelminthes" -name "Мышиный скребень"         -value "Е. monoliferus"
new-item -itemtype file -path "Nemathelminthes" -name "Утиный скребень"          -value "Е. polimorphus"
new-item -itemtype file -path "Nemathelminthes" -name "Бородавчаторот"           -value "Enophus"
new-item -itemtype file -path "Nemathelminthes" -name "Уксусная угрица"          -value "Anguillula aceti"
 
 
Copy-Item Nemathelminthes TEST -rec -force

Добавлено через 1 час 59 минут
---

@Bazaroff · 05.02.2021, 03:29 **[ТС]**

Господа! Я тут шороху навел... нижайше прошу прощения!(
Случайно натолкнулся на прогу!
Может кому пригодится: Duplicate Cleaner Pro.
У нее нет персональной кнопки "Найти дубликаты папок", но при сканировании на предмет дубликатов файлов - в отдельной вкладке отображает группы дубликатов папок.

Всем огромное спасибо за участие в теме, и еще раз прошу прощения!
Я бы пиво всем поставил за этот шухер если бы мог!)

@alhaos · 05.02.2021, 06:17

Сообщение от Bazaroff

Всем огромное спасибо

ну кто вот вы после этого
"Юзер!"

@Bazaroff · 05.02.2021, 09:31 **[ТС]**

Сообщение от alhaos

ну кто вот вы после этого

alhaos, дорогой, ну правда, мне жутко стыдно, что столько шуму наделал! Ну как я могу загладить свою вину? Тыщу извинений только и могу принести! Ну пива давайте попьем!)

Новые блоги и статьи Все статьи Все блоги /
Установка MinGW GCC 16.2 и CMake 8Observer8 10.08.2026 VK Видео: https:/ / vkvideo. ru/ video-240781534_456239017 YouTube: eY5-5PyI9NM Текстовая версия	Неделя из жизни имитационной модели склада: мои кривые руки растут, откуда надо anaschu 10.08.2026 Неделя из жизни имитационной модели склада: как я почти написал неправильную логику и что с этим делать Работаю сейчас над учебно-рабочим проектом: строю в AnyLogic имитационную модель процессов. . .	Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .
Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .	Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .

@Bazaroff 288 / 93 / 11 Регистрация: 29.05.2011 Сообщений: 2,423

	Поиск дубликатов папок 01.02.2021, 14:15. Показов 6792. Ответов 62 Метки нет (Все метки) Как осуществить? Вот есть какой-то локализованный массив папок. Как узнать есть ли среди них идентичные по своему содержанию, и указать какие. Вроде TotalCommander напрашивается. Да никак не придумаю как его можно приспособить для этого.( 0

@alhaos 1934 / 549 / 155 Регистрация: 20.02.2019 Сообщений: 2,675 Записей в блоге: 77
	04.02.2021, 15:29
	DirComp.txt точно тот файл проверяете? 0

@Bazaroff 288 / 93 / 11 Регистрация: 29.05.2011 Сообщений: 2,423
	04.02.2021, 16:17 [ТС]
	Ух жесть! Документ Microsoft Word.docx 0

@Bazaroff 288 / 93 / 11 Регистрация: 29.05.2011 Сообщений: 2,423
	04.02.2021, 18:34 [ТС]
	volodin661, не, я не мышкой! В консоли PowerShell. (запуск от админа) Текущая папка по-умолчанию System32. Ввожу C:\Users\Bazaroff\Desktop\Проекты\Музыка \dircomp.ps1 (файл .ps1 находится там, кодировка ANSI), тыкаю Enter. Добавлено через 1 час 38 минут Господа, а может эту задачу можно решить как-то иначе? Скажем ТоталКоммандеру дать там фильтр, задание, макрос... чтобы он выделил папки, размеры которых встречаются более одного раза. Типо того. Таких совпадений будет немного - дальше руками посмотрю. 0

@Bazaroff 288 / 93 / 11 Регистрация: 29.05.2011 Сообщений: 2,423
	04.02.2021, 19:30 [ТС]
	volodin661, так я же пытаюсь решить сиюминутную задачу. Пока я не ставил целью освоить PowerShell. Вот если будет скриптик - я его сохраню у себя с описанием для чего он мне и как с ним управляться. 0

@Bazaroff 288 / 93 / 11 Регистрация: 29.05.2011 Сообщений: 2,423
	05.02.2021, 03:29 [ТС]
	Господа! Я тут шороху навел... нижайше прошу прощения!( Случайно натолкнулся на прогу! Может кому пригодится: Duplicate Cleaner Pro. У нее нет персональной кнопки "Найти дубликаты папок", но при сканировании на предмет дубликатов файлов - в отдельной вкладке отображает группы дубликатов папок. Всем огромное спасибо за участие в теме, и еще раз прошу прощения! Я бы пиво всем поставил за этот шухер если бы мог!) 0