Elimina ricorsivamente directory vuote in Windows

Ho una directory sulla mia macchina Windows 7 che ha centinaia se non migliaia di sottodirectory. Alcuni di essi hanno file, altri no. Voglio eliminare tutte le directory vuote.

Guardando il comando del e rmdir DOS, non sembra che tu possa farlo in modo ricorsivo senza cancellare tutti i file. C'è un modo per farlo dalla riga di comando?

È possibile utilizzare l' utilità Rimuovi directory vuote .

In alternativa è possibile utilizzare questo file batch di una riga (da DownloadSquad ):

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

(se utilizzato all'interno di un file batch, sostituirlo %dcon %%d)

Questo funziona perché rdnon rimuoverà una directory che contiene file.

Puoi anche usare ROBOCOPY. È molto semplice e può anche essere utilizzato per eliminare cartelle vuote all'interno di una gerarchia di grandi dimensioni.

ROBOCOPY folder1 folder1 /S /MOVE

Qui sono sia l'origine che la destinazione folder1, poiché è sufficiente eliminare le cartelle vuote, invece di spostare altri file in cartelle diverse. /Sl'opzione è di saltare la copia (spostando, nel caso sopra) cartelle vuote. È anche più veloce poiché i file vengono spostati all'interno della stessa unità.

Poiché Cygwin viene fornito con GNU find, puoi farlo:

find . -type d -empty -delete

O per evitare il rumore quando non esiste più una cartella:

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

L'utilità gratuita EmptyFolderNuker fa questo bene, da una cartella di base di tua scelta. Rimuove anche quelle directory che contengono solo sottodirectory vuote.

Se hai installato Cygwin , puoi farlo:

find -type d -exec rmdir {} \;

Se lavori in emacs (rendendo questa piattaforma indipendente), il seguente funziona:

(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 i post di Gareth e G-Man:

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

Modifica: Ma questo ha dato un errore di sicurezza a causa di 'C' nel mio var PATH ... quindi invece:

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

Non uso xargs perché sembra avere un limite di input line (di circa 1024 righe, penso?), Mentre

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

continua solo finché ha input. Escludere il flag dettagliato '-v' se non si desidera vedere i risultati e / o si desidera che esegua più velocemente.

Hmmm ... forse anche la soluzione più semplice:

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

Inizia questo dalla cartella in cui desideri eliminare le cartelle vuote.

/ d - funzionerà su cartelle, non su file / r - richiamerà i sottodir