Hoàn tác lộn xộn tập tin tar

Tôi chỉ mở một kho lưu trữ tạo ra một mớ hỗn độn các tập tin vào thư mục gọn gàng của tôi. Ví dụ:

user@comp:~/tidy$ tar xvf myarchive.tar
file1
file2
dir1/
dir1/file1
dir1/subdir1/
dir1/subdir1/file1
dir2/
dir2/file1
...

Tôi đã hy vọng rằng tập tin tar sẽ được tổ chức trong một thư mục duy nhất (nghĩa là myarchive/), nhưng không phải vậy! Bây giờ tôi có khoảng 190 tệp và thư mục đã được mã hóa kỹ thuật số trong thư mục có tổ chức. Những tập tin chưa được chỉnh sửa này cần được dọn sạch.

Có cách nào để "hoàn tác" cái này và xóa các tập tin và thư mục được trích xuất từ ​​kho lưu trữ này không?

Cảm ơn các câu trả lời tuyệt vời dưới đây. Tóm lại , đây là những gì hoạt động với hai bước (1) xóa tệp và (2) xóa cấu trúc thư mục trống theo thứ tự đóng gói ngược (để xóa các thư mục bên ngoài trước):

tar tf myarchive.tar | xargs -d'\n' rm
tar tf myarchive.tar | tac | xargs -d'\n' rmdir

Và an toàn hơn nữa, để xem trước một lệnh khô bằng cách nối thêm echosau xargs.

tar tf archive.tar

sẽ liệt kê các nội dung theo từng dòng.

Điều này có thể được dẫn đến xargstrực tiếp, nhưng hãy cẩn thận : xóa rất cẩn thận. Bạn không muốn chỉ rm -rmọi thứ tar tfnói với bạn, vì nó có thể bao gồm các thư mục không trống trước khi giải nén!

Bạn có thể làm

tar tf archive.tar | xargs -d'\n' rm -v
tar tf archive.tar | sort -r | xargs -d'\n' rmdir -v

để đầu tiên xóa tất cả các tệp trong kho lưu trữ, và sau đó các thư mục còn trống.

sort -r(glennjackman đề xuất tacthay vì sort -rtrong các nhận xét cho câu trả lời được chấp nhận, cũng hoạt động vì tarđầu ra của nó đủ thường xuyên) là cần thiết để xóa các thư mục sâu nhất trước tiên; mặt khác, một trường hợp dir1chứa một thư mục trống dir2sẽ để lại dir1sau khi rmdirvượt qua, vì nó không trống trước khi dir2bị xóa.

Điều này sẽ tạo ra rất nhiều

rm: cannot remove `dir/': Is a directory

và

rmdir: failed to remove `dir/': Directory not empty
rmdir: failed to remove `file': Not a directory

Hãy tắt 2>/dev/nullnó đi nếu điều đó làm bạn khó chịu, nhưng tôi muốn giữ càng nhiều thông tin về quy trình càng tốt.

Và đừng làm điều đó cho đến khi bạn chắc chắn rằng bạn khớp đúng tệp. Và có lẽ cố gắng rm -ixác nhận mọi thứ. Và có bản sao lưu, ăn sáng, đánh răng, v.v.

Liệt kê nội dung của tệp tar như vậy:

tar tzf myarchive.tar

Sau đó, xóa các tên tệp đó bằng cách lặp qua danh sách đó:

while IFS= read -r file; do echo "$file"; done < <(tar tzf myarchive.tar.gz)

Điều này sẽ vẫn chỉ liệt kê các tập tin sẽ bị xóa. Thay thế echobằng rmnếu bạn thực sự chắc chắn đây là những cái bạn muốn loại bỏ. Và có thể tạo một bản sao lưu để chắc chắn.

Trong một lần thứ hai, loại bỏ các thư mục còn sót lại:

while IFS= read -r file; do rmdir "$file"; done < <(tar tzf myarchive.tar.gz)

Điều này ngăn các thư mục bị xóa nếu chúng đã tồn tại trước đó.

Một thủ thuật hay khác của @glennjackman, giúp duy trì thứ tự các tệp, bắt đầu từ những tệp sâu nhất. Một lần nữa, loại bỏ echokhi thực hiện.

tar tvf myarchive.tar | tac | xargs -d'\n' echo rm

Điều này sau đó có thể được theo sau bởi rmdirdọn dẹp bình thường .

Đây là một khả năng sẽ lấy các tệp được giải nén và chuyển chúng sang thư mục con, dọn sạch thư mục chính của bạn.

    #!/usr/bin/perl -w

    use strict;
    use Getopt::Long;

    my $clean_folder = "clean";
    my $DRY_RUN;
    die "Usage: $0 [--dry] [--clean=dir-name]\n"
        if ( !GetOptions("dry!" => \$DRY_RUN,
                         "clean=s" => \$clean_folder));

    # Protect the 'clean_folder' string from shell substitution
    $clean_folder =~ s/'/'\\''/g;

    # Process the "tar tv" listing and output a shell script.
    print "#!/bin/sh\n" if ( !$DRY_RUN );
    while (<>)
    {
        chomp;

        # Strip out permissions string and the directory entry from the 'tar' list
        my $perms = substr($_, 0, 10);
        my $dirent = substr($_, 48);

        # Drop entries that are in subdirectories
        next if ( $dirent =~ m:/.: );

        # If we're in "dry run" mode, just list the permissions and the directory
        # entries.
        #
        if ( $DRY_RUN )
        {
            print "$perms|$dirent\n";
            next;
        }

        # Emit the shell code to clean up the folder
        $dirent =~ s/'/'\\''/g;
        print "mv -i '$dirent' '$clean_folder'/.\n";
    }

Lưu cái này vào tập tin fix-tar.plvà sau đó thực hiện nó như thế này:

$ tar tvf myarchive.tar | perl fix-tar.pl --dry

Điều này sẽ xác nhận rằng tardanh sách của bạn giống như của tôi. Bạn sẽ nhận được đầu ra như:

-rw-rw-r--|batch
-rw-rw-r--|book-report.png
-rwx------|CaseReports.png
-rw-rw-r--|caseTree.png
-rw-rw-r--|tree.png
drwxrwxr-x|sample/

Nếu nó có vẻ tốt, thì hãy chạy lại như thế này:

$ mkdir cleanup
$ tar tvf myarchive.tar | perl fix-tar.pl --clean=cleanup > fixup.sh

Các fixup.shkịch bản sẽ là các lệnh shell mà sẽ di chuyển các tập tin top-level và thư mục vào một thư mục "sạch" (trong trường hợp này, các thư mục có tên cleanup). Hãy xem qua kịch bản này để xác nhận rằng đó là tất cả. Nếu có, bây giờ bạn có thể dọn dẹp mớ hỗn độn của mình bằng:

$ sh fixup.sh

Tôi thích kiểu dọn dẹp này vì nó không phá hủy bất cứ thứ gì chưa bị phá hủy bằng cách bị ghi đè bởi chữ cái đầu tiên đó tar xv.

Lưu ý: nếu đầu ra chạy khô ban đầu đó không đúng, bạn sẽ có thể sử dụng các số trong hai substrlệnh gọi cho đến khi chúng trông phù hợp. Các $permsbiến được sử dụng chỉ cho khô chạy như vậy thực sự chỉ có $direntnhu cầu substring là thích hợp.

Một điều khác: bạn có thể cần sử dụng tartùy chọn --numeric-ownernếu tên người dùng và / hoặc tên nhóm trong tardanh sách làm cho tên bắt đầu trong một cột không thể đoán trước.

Loại lưu trữ (chống xã hội) đó được gọi là bom tar vì những gì nó làm. Khi một trong những "phát nổ" này vào bạn, các giải pháp trong các câu trả lời khác sẽ tốt hơn những gì tôi đã đề xuất.

"Giải pháp" tốt nhất, tuy nhiên, là ngăn chặn vấn đề ngay từ đầu.

Cách dễ nhất (lười nhất) để làm điều đó là luôn luôn giải nén một kho lưu trữ tar vào một thư mục trống. Nếu nó bao gồm một thư mục cấp cao nhất, thì bạn chỉ cần di chuyển nó đến đích mong muốn. Nếu không, sau đó chỉ cần đổi tên thư mục làm việc của bạn (thư mục trống) và di chuyển nó đến vị trí mong muốn.

Nếu bạn chỉ muốn làm cho đúng ngay lần đầu tiên, bạn có thể chạy tar -tvf archive-file.tar | ít hơn và nó sẽ liệt kê các nội dung của kho lưu trữ để bạn có thể thấy nó được cấu trúc như thế nào và sau đó làm những gì cần thiết để trích xuất nó đến vị trí mong muốn để bắt đầu.

Tùy chọn t cũng có ích nếu bạn muốn kiểm tra nội dung của kho lưu trữ chỉ để xem liệu nó có thứ gì bạn đang tìm kiếm trong đó không. Nếu có, bạn có thể, tùy ý, chỉ cần giải nén (các) tệp bạn muốn.