Поиск файлов без рекурсии

[waleri]

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

При рекурсии юзается стек статической памяти (я точно не помню, но что-то около 64 килобайт; сравните с динамической, которой могут быть гигабайты).

Стека тоже могут быть гигабайты. По умолчанию под Windows - 1МБ.

Зато обычно скорость выполнения рекурсии + стек обычно выше, чем если использовать динамическую память.

Были времена, когда на компах было действительно 1-2К стека и 64К памяти - тогда действительно на рекурсии далеко не уедеш. Увы, эти времена далеко в прошлом.

[Airhand]

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

Стека тоже могут быть гигабайты. По умолчанию под Windows - 1МБ.

Зато обычно скорость выполнения рекурсии + стек обычно выше, чем если использовать динамическую память.

Были времена, когда на компах было действительно 1-2К стека и 64К памяти - тогда действительно на рекурсии далеко не уедеш. Увы, эти времена далеко в прошлом.

Стек тоже разным бывает: открываем C++Builder/Project/Options…/Linker. Видим min stack size – 8kb; max stack size – 1024kb (1 Mb). И где гигабайты ?

[FataLL]

Airhand
О чём речь вообще идёт? Если ты понимаешь, что такое стек, то вызов функции с целочисленным аргументом потребует от стека всего 8 байт. Столько же уйдёт для его вызова с указателем на самую хитрую структуру. Т.е., функция может самовызываться тысячи раз без особых проблем. Для большинства целей этого предостаточно.

[Airhand]

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

Airhand
О чём речь вообще идёт? Если ты понимаешь, что такое стек, то вызов функции с целочисленным аргументом потребует от стека всего 8 байт. Столько же уйдёт для его вызова с указателем на самую хитрую структуру. Т.е., функция может самовызываться тысячи раз без особых проблем. Для большинства целей этого предостаточно.

Есть динамический стек (которого на 32 битной системе около 3.5 гигабайт), а есть стек вызовов (которого около 1 мегабайта). Вот о финальном речь и идёт: в него помимо названий функций (а они компилером именуются иначе) ещё добавляются аргументы функций (фактические). Он всего лишь 1 мегабайт, вот его может и не хватить.

[waleri]

Размер стека в Windows ограничен только адресным пространством процесса.

[FataLL]

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

в него помимо названий функций (а они компилером именуются иначе) ещё добавляются аргументы функций (фактические). Он всего лишь 1 мегабайт, вот его может и не хватить.

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

[calypso]

Что-то с глубиной вложения не получается сделать,года 3 назад делал на Делфи, а сейчас на С++ не могу найти примеры.
Т.е. непонятно в какое место у рекурсивной функции надо вставлять это счетчик, я пробовал писать glubina++ там где проверяется каталог с "." и "..",но по-моему неверно работает.Ищет либо только в корне,либо всё по максимуму

[BDA]

void ListFiles(AnsiString path, TStrings* List, int depth)
{
if (!depth)
  return;
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
{
 do
 {
 if (sr.Attr & faDirectory)
  {
  if (sr.Name!=".")
  if (sr.Name!="..")
   {
	AnsiString Ext=ExtractFileExt(sr.Name).UpperCase();
   if ((Ext==".avi") | (Ext==".wmv") | (Ext==".mpg")|(Ext==".mp4"))
   List->Add(path+sr.Name);
   else ListFiles(path+sr.Name+"\\",List, depth - 1);// Рекурсивный вызов
   }
   }
 }
 while (FindNext(sr) == 0);
 FindClose(sr);
}
Application->ProcessMessages();
}

Вызываете с depth = 3 - получаете вложенность 3 (по идее ).
Кстати, какой-то странный код.
Мне кажется, что правильнее:

void
ListFiles(AnsiString path, TStrings* List, int depth)
{
    if (!depth)
      return;
    TSearchRec sr;
    if (FindFirst(path+"*", faAnyFile, sr) == 0)
        do {
            if (sr.Attr & faDirectory) {
                if (sr.Name != "." && sr.Name != "..")
                    ListFiles(path+sr.Name+"\\",List,depth - 1);
            } else {
                AnsiString Ext=ExtractFileExt(sr.Name).UpperCase();
                if (Ext==".AVI" || Ext == ".WMV" || Ext==".MPG" || Ext == ".MP4")
                    List->Add(path+sr.Name);
            }
        } while (FindNext(sr) == 0);
        FindClose(sr);
    Application->ProcessMessages();
}

И да, код не тестировался, так что возможны неточности.

[calypso]

Ну да,второй вариант работает и он более правильный.Я не догадался,что глубину надо использовать как переменную самой функции, т.к. если ее просто обнулять внутри ListFiles то рекурсивный вызов правильно работает только 1-й раз.