[分享]gawk以tree/f的输出结果为依据重建文件结构

hfxiang

本组合脚本将tree/f的输出结果以重建文件夹及空文件的形式重建整个文件结构

将

1. 
   
2. BEGIN {
   
3.         Dir_No = 0
   
4.         Dir = "."
   
5.         Cha_pos = 0
   
6.         Dir_FCP = 0
   
7. }
   
8. /^[│├└ ]+[^│├└ ].*$/ {
   
9.         if ($0 ~ /^.*[├└]/) {
   
10.                 Cha_pos = match($0, /[├└]/)
    
11.                 if (Cha_pos > Dir_FCP) {
    
12.                         Dir_No++
    
13.                         No_pos[Cha_pos] = Dir_No
    
14.                 }
    
15.                 if (Cha_pos < Dir_FCP) {
    
16.                         Dir_No = No_pos[Cha_pos]
    
17.                 }
    
18.                 Dir_FCP = Cha_pos
    
19.                 Folder[Dir_No] = gensub(/^.*[├└]─(.+)$/, "\\1", "g", $0)
    
20.                 Dir = "."
    
21.                 for (i = 1; i <= Dir_No; i++) {
    
22.                         Dir = Dir "\" Folder[i]
    
23.                 }
    
24.                 print "mkdir "" Dir "">nul 2>&1"
    
25.         } else {
    
26.                 file_name = Dir "\" (gensub(/^([│ ]+)([^│ ].*)$/, "\\2", "g", $0))
    
27.                 print "echo;2>"" file_name """
    
28.         }
    
29. }
    

复制代码

以ANSI编码格式保存为tree.awk

将

1. 
   
2. gawk -f.\tree.awk tree.txt|cmd.exe
   

复制代码

以ANSI编码格式保存为tree.bat

在命令行窗口执行：

1. 
   
2. tree /f>tree.txt
   

复制代码

以获取tree.txt

下载gawk（http://bcn.bathome.net/tool/4.1.0/gawk.exe）

将gawk.exe、tree.awk、tree.txt、tree.bat复制到欲重建文件结构的子文件夹（如D:\test），双击tree.bat执行后即可重建整个文件结构（注：重建后所有的文件均为空文件）