当前目录生成XML文件

xuxingyu

原帖由 youshuang 于 2009-4-17 17:06 发表
而且这个目录不一定是两层阿！
要递归处理所有子目录，我只是举个例子。

去perl 版问问

youshuang

恩，我也听说过perl处理这些东西很强。
不过人家是公司培训作业，要求用shell写。
这里的高手都说不好写，刚毕业的家伙，惨了惨了。。。

beginner-bj

1. 17:20:57 root@ST-FREE:[/]#find /test
   
2. /test
   
3. /test/dirA
   
4. /test/dirB
   
5. /test/dirB/fileD
   
6. /test/dirC
   
7. /test/dirC/fileE
   
8. 17:21:02 root@ST-FREE:[/]#find /test |sed -e 's@/@@' -e 's@[^/]*/@    @g'
   
9. test
   
10.     dirA
    
11.     dirB
    
12.         fileD
    
13.     dirC
    
14.         fileE
    
15. 17:21:05 root@ST-FREE:[/]#

复制代码

beginner-bj

原帖由 youshuang 于 2009-4-17 17:06 发表
而且这个目录不一定是两层阿！
要递归处理所有子目录，我只是举个例子。

哦，这正是我要说的，我没考虑很多层的情况。我也只是举个例子。

youshuang

厉害！
大哥能写个完整的吗，太谢谢了。
我没法实验你的代码，小弟没看懂前面那段。
只是从字面上看好像处理不了更深的目录层次

ly5066113

test
    fileF
    dirA
    dirB
        fileD
    dirC
        fileE
    dirG
        dirH

要变成什么样子啊？

beginner-bj

现在太忙了，估计20:00后才有空。估计那时TIM或别的大侠来了，问题早解决了。

beginner-bj

1. $ find t -ls
   
2. 51138079    4 Drwxr-xr-x  6 mawt      50101        4096 Apr 17 21:55 t
   
3. 51138080    4 Drwxr-xr-x  2 mawt      50101        4096 Apr 17 19:03 t/t1
   
4. 51134466    1 Frw-r--r--  1 mawt      member         647 Oct  3  2008 t/t1/0
   
5. 36077597    1 Frw-r--r--  1 mawt      member         647 Oct  3  2008 t/t1/1
   
6. 59851294    4 Drwxr-xr-x  2 mawt      member        4096 Apr 17 21:55 t/t6
   
7. 51138084    4 Drwxr-xr-x  2 mawt      50101        4096 Apr 17 19:04 t/t3
   
8. 51138086    0 Frw-r--r--  1 mawt      50101           0 Jun 25  2008 t/t3/d
   
9. 51138085    0 Frw-r--r--  1 mawt      50101           0 Jun 25  2008 t/t3/c
   
10. 51138081    4 Drwxr-xr-x  3 mawt      50101        4096 Apr 17 19:04 t/t2
    
11. 58638927    4 Drwxr-xr-x  3 mawt      member        4096 Apr 17 21:45 t/t2/t4
    
12. 58638928    0 Frw-r--r--  1 mawt      member           0 Apr 17 19:04 t/t2/t4/e
    
13. 58639976    0 Frw-r--r--  1 mawt      member           0 Apr 17 21:45 t/t2/t4/g
    
14. 58640358    0 Frw-r--r--  1 mawt      member           0 Apr 17 21:45 t/t2/t4/h
    
15. 58638929    0 Frw-r--r--  1 mawt      member           0 Apr 17 19:04 t/t2/t4/f
    
16. 59850999    4 Drwxr-xr-x  3 mawt      member        4096 Apr 17 22:37 t/t2/t4/t5
    
17. 59851017    4 Drwxr-xr-x  2 mawt      member        4096 Apr 17 22:37 t/t2/t4/t5/t7
    
18. 51138083    1 Frw-r--r--  1 mawt      50101           3 Jun 25  2008 t/t2/b
    
19. 51138082    0 Frw-r--r--  1 mawt      50101           0 Jun 25  2008 t/t2/a
    
20. 36061962    0 Frw-r--r--  1 mawt      member           0 Apr  8 23:38 t/aa
    
21. $ find t -exec ls -Fd {} \; |\
    
22. > awk -F'/' '{
    
23. > if ($0~/\/$/) dir=1; else dir=0; deep=NF-1        #deep=gsub("/","/")
    
24. > if (dir=="1")
    
25. >       {
    
26. >       if (DEEP>=deep) {for ( x = 1; x < DEEP; x++ )  {printf "    "};print "</"DIRNAME">";}
    
27. >       if (DEEP<=deep) {a[deep]=$(NF-1)}
    
28. >       for ( x = 1; x < deep; x++ )  {printf "    "}; print "<"$deep">";dirname=$(NF-1);
    
29. >       }
    
30. > else  
    
31. >       {
    
32. >       if (DEEP>deep &&  DIR=="0") {for ( x = 1; x < DEEP; x++ )  {printf "    "};print "</"a[DEEP]">";}
    
33. >       if (DEEP>deep &&  DIR=="1")
    
34. >               {
    
35. >               for ( y = DEEP; y > deep; y-- )  
    
36. >                       {
    
37. >                       for ( x = 1; x < y; x++ )  {printf "    "};print "</"a[y]">"
    
38. >                       }
    
39. >               }
    
40. >       for ( x = 1; x < deep; x++ )  {printf "    "}; print "    "$NF
    
41. >       }
    
42. > DIR=dir; DEEP=deep; DIRNAME=dirname}
    
43. > END {print "</"a[1]">"}'
    
44. <t>
    
45.     <t1>
    
46.         0
    
47.         1
    
48.     </t1>
    
49.     <t6>
    
50.     </t6>
    
51.     <t3>
    
52.         d
    
53.         c
    
54.     </t3>
    
55.     <t2>
    
56.         <t4>
    
57.             e
    
58.             g
    
59.             h
    
60.             f
    
61.             <t5>
    
62.                 <t7>
    
63.                 </t7>
    
64.             </t5>
    
65.         </t4>
    
66.         b
    
67.         a
    
68.     </t2>
    
69.     aa
    
70. </t>
    
71. $

复制代码

[ 本帖最后由 beginner-bj 于 2009-4-17 23:11 编辑 ]

kvkingdom

用递归想了一个,不过还没有解决缩进问题:
#!/bin/bash

dir_to_xml()
{
    local file dir=${1%/}
    [ -d "$dir" ] || return 1
    echo "<${dir##*/}>"
    for file in $(ls -d ${dir}/* 2>/dev/null)
    do
        if [ -d $file ]
        then
            dir_to_xml $file
        else
            echo ${file##*/}
        fi
    done   
    echo "</${dir##*/}>"
    return 0
}

dir_to_xml $1

haimming

可以再写一个格式化的函数来处理缩进