Bagaimana cara menyalin struktur folder dan membuat tautan simbolis ke file?

Saya memiliki SUMBER folder yang berisi beberapa folder sub-level, masing-masing dengan file sendiri.

Saya ingin menyalin folder ini dalam folder SALINAN baru di mana saya perlu menyalin struktur direktori tetapi menyimpan file sebagai tautan simbolis ke file asli di SOURCE dan subfoldernya.

Inilah solusinya pada Linux dan Cygwin yang tidak tertanam:

cp -as SOURCE/ COPY

Perhatikan bahwa SOURCE harus menjadi jalur absolut dan memiliki garis miring. Jika Anda ingin memberikan jalur relatif, Anda dapat menggunakan

cp -as "$(pwd)/SOURCE/" COPY

Setidaknya ada 2 utilitas standar untuk membangun pohon direktori bayangan dari pohon yang ada, jadi tidak perlu menulis kode di sini.

Pertama ada lndir(1)dari xutils-devpaket. Ini menggunakan symlink ke file. Dari halaman manual:

NAME
   lndir  -  create a shadow directory of symbolic links to another
             directory tree
SYNOPSIS
   lndir [ -silent ] [ -ignorelinks ] [ -withrevinfo ] fromdir [ todir ]

Alternatif yang mungkin lebih baik adalah dengan menggunakan cpopsi yang tepat seperti yang disarankan oleh jawaban yang diterima. Saya hanya akan memberikan beberapa detail yang lebih bermanfaat:

cp -al /src/dir /dest/dir    # hard-links to leaf-files
cp -as /src/dir /dest/dir    # symlinks to leaf-files

Jika Anda tidak peduli tentang mempertahankan semua atribut (kepemilikan / izin, waktu) ganti aopsi (setara dengan -dr --preserve=all) dengan r(hanya rekursif):

cp -rl /src/dir /dest/dir    # hard-links to leaf-files
cp -rs /src/dir /dest/dir    # symlinks to leaf-files

Anda dapat mencoba beberapa perintah find seperti ini:

mkdir FULL-PATH-TO-COPY
cd SOURCE
find . \( ! -regex '\.' \) -type d -exec mkdir FULL-PATH-TO-COPY/{} \;
find * -type f -exec ln -s `pwd`/{} FULL-PATH-TO-COPY/{} \;

Sesuatu seperti ini akan melakukan apa yang Anda butuhkan.

#!/bin/bash
#
SOURCE="$1" COPY="$2"
cd "$SOURCE"
find . |
    sed 's!^\./!!' |
    while IFS= read ITEM
    do
        test -d "$ITEM" && { mkdir -p "$COPY/$ITEM"; continue; }
        BASE="${FILE%\/*}"
        ( cd "$COPY/$BASE" && ln -s "$SOURCE/$ITEM" )
    done

Direktori dibuat di pohon COPY target. Yang lainnya disinkronkan kembali ke jalur absolut dalam pohon SUMBER. Pastikan bahwa SUMBER dan SALINAN ditentukan sebagai jalur absolut (dimulai dengan /).

Jika Anda memiliki pohon besar untuk disalin dan Anda ingin laporan kemajuan per-direktori, Anda bisa menambahkan echo "$ITEM" >&2;sebelum mkdirperintah.

(Saya melihat cpdan cpiotetapi sepertinya tidak ada pilihan untuk menghubungkan ke sumber dengan tautan simbolik.)

Jika tidak ada dir kosong di SOURCE yang perlu disalin

find /full/path/to/SOURCE -type f -exec cp -t COPY --parents -s {} +
mv COPY/full/path/to/SOURCE COPY
rm -r COPY/full

Saya akan mulai dengan memecah perl:

#!/usr/bin/perl

use strict;
use warnings;
use File::Find;

my $src_dir = "/full_path/to/dir";
my $tgt_dir = "/path/to/new/location";

sub link_or_mkdir {

    #current file is directory
    if (-d) {
        #extract the path
        my $newpath = $File::Find::dir;
        #change the path so 'old' and 'new' are swapped
        $newpath =~ s,^$src_dir,$tgt_dir,g;
        #print the command to make a new dir (doesn't actually do it)
        print "mkdir -p $newpath\n";
    }
    if (-f) {
        my $new_file = $File::Find::name;
        #change the path so 'old' and 'new' are swapped
        $new_file =~ s,^$src_dir,$tgt_dir,g;
        #print the symlink command
        print "ln -s $File::Find::name $new_file\n";
    }
}

find( \&link_or_mkdir, $tgt_dir );

File::Findadalah modul yang berguna yang memungkinkan Anda untuk menjalankan subrutin tertentu pada file apa pun dalam pohon direktori. Dalam hal ini, sub memeriksa apakah itu direktori - dan jika itu, apakah mkdirfile atau - dalam hal ini apakah itu symlink.

Sepertinya Anda mencari sesuatu seperti alat rsnapshot; itu membuat salinan direktori arbitrer dan menggunakan hardlink jika memungkinkan. (Lihat halaman manual untuk melihat apakah itu cocok.)