Удаление директории

[Ace]

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

BOOL    RemoveDir( IN LPCTSTR szDir)
{
    BOOL fRet = FALSE;
    if( !szDir) return fRet;
 
    size_t tReplaceLen = 1;
    WIN32_FIND_DATA fd = {};
 
    // Формируем строку пути для поиска файлов
    std::basic_string< TCHAR > stPath( szDir);
    stPath += _T( "\\*");
 
    HANDLE hFind = FindFirstFile( stPath.c_str(), &fd);
    if( hFind != INVALID_HANDLE_VALUE)
    {
        fRet = TRUE;
        do {
            // Игнорируем вхождения в каталог
            if( !(_tcscmp( fd.cFileName, _T( ".")) && _tcscmp( fd.cFileName, _T( ".."))) )
                continue;
 
            // Формруем полный путь к файлу/каталогу
            stPath.replace( stPath.end() - tReplaceLen, stPath.end(), fd.cFileName);
            tReplaceLen = _tcslen( fd.cFileName); // Прикапываем для следующего replace
 
            if( fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
                fRet = RemoveDir( stPath.c_str()); // Удаляем все потроха найденного каталога
            else
            {
                // Просто удаляем найденный файл
                if( fd.dwFileAttributes & FILE_ATTRIBUTE_READONLY)
                    SetFileAttributes( stPath.c_str(), FILE_ATTRIBUTE_NORMAL);
                fRet = DeleteFile( stPath.c_str());
            }
 
        } while( fRet && FindNextFile( hFind, &fd));
        FindClose( hFind);
 
        // Заключительный момент - удалить пустой каталог...
        if( fRet) fRet = RemoveDirectory( szDir);
    }
    return fRet;
}

[UncleBob]

Че-то понамешано, STL, CRT, WinAPI...

[Ace]

Цитата Uncle_Bob @ 20.07.06, 10:00

Че-то понамешано, STL, CRT, WinAPI...

stl - для того, чтоб не вляпатся в MAX_PATH. Попробуй создать в тотале путь более 260 символов и скопировать что-нить в эту диру...
Можно канечна обойтись и без stl, но зачем мудрить?
crt - ну, можно убрать сравнение строк и написать условие проверки на два символа.
апи - ммм, предлагаешь на мфс заменить?

[Ace]

ЗЫ. Кстати, эти пережитки с MAX_PATH могут к таким глюкам приводить. Я када писал свой плаг к тоталу, не раз попадал на это ограничение. Писал Гислеру, но он пока тока обещает увеличить свои буффера

[UncleBob]

Да я не против, просто лично по мне либо одно, либо другое, либо третье

STL+API, CRT+API, MFC-only, WinAPI-only что-нить в этом роде

[Ace]

Да я понимаю что не против
Просто, стл базируется на црт, т.ч. связка STL+API-CRT не осуществима в принципе. Оставлять только апи - это значит ручками мараться со стековой/свободной памятью.
Если используемые возможности облегчают написание кода и его понимание, то такое использование должно только приветствоваться.

[twins_jabbers]

Удаление директории

#include "shellapi.h"
#pragma comment( lib, "shell32.lib" ) // добавить shell32.lib
 
// вариант для Unicode
int Remove_dirW(LPCWSTR pPath)
{
  SHFILEOPSTRUCTW sh;
  ZeroMemory(&sh,sizeof(SHFILEOPSTRUCTW));
  sh.wFunc = FO_DELETE;
  sh.pFrom = pPath; //удаляемая директория
  //(путь в формате Unicode, завершающийся 2-мя NULL-терминаторами...)
  sh.fFlags = FOF_NOCONFIRMATION | FOF_SILENT;
  return SHFileOperationW(&sh);
}
 
// Для Ansi
int Remove_dirA(LPCTSTR pPath)
{
  SHFILEOPSTRUCTA sh;
  ZeroMemory(&sh,sizeof(SHFILEOPSTRUCTA));
  sh.wFunc = FO_DELETE;
  sh.pFrom = pPath; //удаляемая директория
  //(путь в формате Ansi, завершающийся NULL-терминатором...)
  sh.fFlags = FOF_NOCONFIRMATION | FOF_SILENT;
  return SHFileOperationA(&sh);
}
 
//Пример:
void primer()
{
  Remove_dirW(L"WidePath\0"); // Unicode
  Remove_dirA("AnsiPath");   // Ansi
}

или
Под VCL

// полное удаление каталога при помощи рекурсивного обхода всех файлов и вложенных папок
 
bool DeleteDir(AnsiString DirName)
{
TSearchRec sr;
if (DirName.Length())
 {
 if (!FindFirst(DirName+"\\*.*",faAnyFile,sr))
 do
  {
  if (!(sr.Name=="." || sr.Name==".."))// это удалять не надо
   if (((sr.Attr & faDirectory) == faDirectory ) ||
   (sr.Attr == faDirectory))// найдена папка
    {
    FileSetAttr(DirName+"\\"+sr.Name, faDirectory );// сброс всяких read-only
    DeleteDir(DirName+"\\"+sr.Name);//рекурсивно удаляем содержимое
    RemoveDir(DirName + "\\"+sr.Name);// удаляем теперь уже пустую папку
    }
    else// иначе найден файл
    {
    FileSetAttr(DirName+"\\"+sr.Name, 0);// сброс всяких read-only
    DeleteFile(DirName+"\\"+sr.Name);// удаляем файл
    }
  }
 while (!FindNext(sr));// ищем опять, пока не найдем все
 FindClose(sr);
 }
RemoveDir(DirName);
return true;
}

Сообщение отредактировано: mad_avenger - 28.07.06, 16:10

[MinLexx]

В первую функцию BOOL RemoveDir( IN LPCTSTR szDir) неплохо бы добавить некоторые параметры и возможности, типа BOOL bForceRemoveHiddenFiles, BOOL bForceRemoveSystemFiles, BOOL bForceRemoveReadOnlyFiles. Думаю, значение понятно
Универсальнее было бы 8)

Сообщение отредактировано: MinLexx - 22.07.06, 11:55

[Ace]

Цитата MinLexx @ 22.07.06, 11:54

Универсальнее было бы 8)

Неа, не будет. Как ты себе это представляешь? Если встретятся удалять системные, а вот скрытые при этом не трогать? Тогда и дира не удалится, т.к. останется не пустой...

[Ace]

mad_avenger, подправь свою Remove_dir. Укажи необходимые инклуды, убери билдеровский хэндл окна и подправь параметр Path, чтоб функция поддерживала уникод. Кроме этого, необходимо указать, что Path обязан завершатся двумя нуль-терминаторами. Иначе просто не будет работать...
По vcl-ской сказать ничего не могу, не помню я уже билдеровское

[MinLexx]

Цитата Ace @ 22.07.06, 17:43

Цитата MinLexx @ 22.07.06, 11:54

Универсальнее было бы 8)

Неа, не будет. Как ты себе это представляешь? Если встретятся удалять системные, а вот скрытые при этом не трогать? Тогда и дира не удалится, т.к. останется не пустой...

Именно, если встретятся скрытые файлы при не установленном bForceRemoveHiddenFiles или если встретятся системные при не установленном bForceRemoveSystemFiles или если встретятся рид-онли при не установленном bForceRemoveReadOnlyFiles, то возвращать FALSE и прерывать удаление каталога. Или как вариант, предварительно проверять каталог на наличие возможных таких вот ошибочных ситуаций, ничего не удаляя, и если всё ОК, то удалять всё, иначе вернуть FALSE Первый вариант проще, удалять, пока удаляется 8)

[Ace]

Неа. Данное творение (твои флаги) - частный случай использования. Думаю, что достаточно за базу взять исходник RemoveDir, и дописать необходимые "дополнительные" возможности...

[twins_jabbers]

Цитата Ace @ 22.07.06, 18:10

По vcl-ской сказать ничего не могу, не помню я уже билдеровское

Спасибо за коммент! Сейчас сделаю.
Так бы не заметил...

[n0rd]

А символические ссылки приведенные куски кода корректно обрабатывают?

[СамиМыНеместные]

Аффтора!
Я юзуюсь по ХР и MFC(где-то от 99 года) . Тут слыхом не слыхивали за TSearchRec и SHFILEOPSTRUCTW. Где их можна нарыть-то?