Excluir recursivamente diretórios vazios no Windows

Eu tenho um diretório na minha máquina Windows 7 que possui centenas, se não milhares, de subdiretórios. Alguns deles têm arquivos, outros não. Eu quero excluir todos os diretórios vazios.

Observando o comando del e rmdir DOS, não parece que você pode fazer isso recursivamente sem excluir todos os arquivos. Existe uma maneira de fazer isso na linha de comando?

Você pode usar o utilitário Remover Diretórios Vazios .

Como alternativa, você pode usar este arquivo em lotes de uma linha (do DownloadSquad ):

for /f "delims=" %d in ('dir /s /b /ad ^| sort /r') do rd "%d"

(se usado dentro de um arquivo em lotes, substitua %dpor %%d)

Isso funciona porque rdnão removerá um diretório que contém arquivos.

Você também pode usar o ROBOCOPY. É muito simples e também pode ser usado para excluir pastas vazias dentro de uma grande hierarquia.

ROBOCOPY folder1 folder1 /S /MOVE

Aqui, tanto a origem quanto o destino são folder1, pois você só precisa excluir pastas vazias, em vez de mover outros arquivos para uma pasta diferente. /SA opção é pular a cópia (movendo, no caso acima) de pastas vazias. Também é mais rápido à medida que os arquivos são movidos dentro da mesma unidade.

Como o Cygwin vem com o GNU find, você pode fazer o seguinte:

find . -type d -empty -delete

Ou para evitar o barulho quando uma pasta não existir mais:

find . -type d -empty -execdir rmdir {} +

O utilitário gratuito EmptyFolderNuker faz isso muito bem, a partir de uma pasta base de sua escolha. Ele também remove os diretórios que contêm apenas subdiretórios vazios.

Se você tiver o Cygwin instalado, poderá fazer o seguinte:

find -type d -exec rmdir {} \;

Se você estiver trabalhando no emacs (tornando esta plataforma independente), o seguinte funciona:

(defun *-delete-empty-directories (root-directory)
  "Recursively delete empty directories in ROOT-DIRECTORY.

When called from dired, `dired-current-directory' is used for
ROOT-DIRECTORY."

  ;; Interface
  (interactive (list (if (eq major-mode 'dired-mode)
                         (expand-file-name (dired-current-directory))
                       (read-from-minibuffer "Root directory: "))))
  (when (or (null root-directory) (string= "" root-directory))
    (user-error "No root directory provided"))
  (when (called-interactively-p 'interactive)
    (unless (yes-or-no-p (format "Delete all non-empty directories in `%s'? "
                                 root-directory))
      (user-error "Directory `%s' has been left untouched" root-directory)))

  ;; Implementation
  (require 'f)
  (let ((entries (f-directories root-directory)))
    (while entries
      (let ((curdir (car entries)))
        (when (f-directories curdir)
          (*-delete-empty-directories curdir))
        (unless (f-entries curdir)
          (delete-directory curdir)
          (message "Directory deleted: `%s'" curdir))
        (setq entries (cdr entries)))))

Combinando as postagens de Gareth e G-Man:

find . -depth -type d -empty -execdir rmdir {} +

Edit: Mas isso deu um erro de segurança por causa de 'C' na minha PATH var ... então, em vez disso:

$find . -depth -type d -empty | while read dir; do (rmdir -v $dir); done

Eu não uso xargs porque parece ter um limite de linha de entrada (de cerca de 1024 linhas, eu acho?), Enquanto

 while read x; do (command $x); done

apenas continua enquanto houver entrada. Deixe de fora o sinalizador detalhado '-v' se você não deseja ver os resultados e / ou deseja que ele seja executado mais rapidamente.

Hmmm ... talvez solução ainda mais simples:

for /d /r %d in (*.*) do rd "%d"

Comece isso na pasta em que deseja excluir as pastas vazias.

/ d - funcionará em pastas, não em arquivos / r - recursará subdiretórios