去掉c代码中的注释的方法（汇总）

 原始讨论贴见：
http://bbs.chinaunix.net/viewthread.php?tid=846353&extra=page%3D1

http://bbs.chinaunix.net/viewthread.php?tid=846682&extra=page%3D1

http://bbs.chinaunix.net/viewthread.php?tid=846685&extra=page%3D1

感谢大家的热情参与！我把符合基本要求的方法统一汇总到这里，方便大家分析和比较各种方法的优劣。

对于方法需要满足的基本要求，目前暂定为能够处理以下5种形式的c语言注释：

1. 1.  /* aaaaaaaaaaaaaaaaaaaaaaaaa
   
2.        bbbbbbbbbbbbbbbbbbbbbbbbb
   
3.        ccccccccccccccccccccccccc */
   
4.    
   
5. 2.  /* ddddddddddddddddddddddddd */
   
6.    
   
7. 3.  int foo; /* eeeeeeeeeeeeeeeee */
   
8.    
   
9. 4.  /* ffffffffffffffff */  int bar;
   
10.    
    
11. 5.  int foobar; /* gggggggggggggggg
    
12.                    hhhhhhhhhhhhhhhh
    
13.                    iiiiiiiiiiiiiiii */

复制代码

大家提出的方法我会尽快验证，已经通过验证的方法如下（按方法大类组织）：

【雨丝风片】，awk脚本：

1. BEGIN { del = 0 }
   
2. /\/\*.*\*\// { sub(/\/\*.*\*\//, "") }
   
3. /\/\*/ { del = 1; sub(/\/\*.*$/, ""); if (!match($0, /^ *$/)) print }
   
4. /\*\// { del = 0; next }
   
5. /^ *$/ { next }
   
6. del == 0 { print }

复制代码

【congli】，awk脚本：

1. BEGIN { del = 0; d = 0 }
   
2. /\/\*.*\*\// { sub(/\/\*.*\*\//,"") }
   
3. /.*\/\*/ { sub(/\/\*.*\*\//,"") }
   
4. /^\/\*/ { del = 1; d=1 }
   
5. {if (d==1) { del = 1 } else { del = 0}}
   
6. /\*\// { if (d==1) { d=0 ; next } }
   
7. /.*\/\*.*/ { sub(/\/\*.*/,""); d=1 }
   
8. /^ *$/ { next }
   
9. del == 0 { print }

复制代码

【waker】，awk：

1. awk 'BEGIN{RS="/\*|\*/"} NR%2'  foo.c

复制代码

【woodie】，awk：

1. awk -vRS='/\\*|\\*/' -vORS="" '!c;RT=="/*"{c++}RT=="*/"{c--}'

复制代码

【woodie】，awk：

1. awk -vRS='/\\*|\*/' -vORS="" '{sub(/\/\/.*\n/, "")}!c;RT=="/*"{c++}RT=="*/"{c--}'

复制代码

【awk就是awp加ak】，awk：

1. awk '
   
2. function clearComment(){
   
3. 
   
4.         if ($0~/\/\*/){
   
5. 
   
6.                 if ($0~/\*\//) sub(/\/\*.*\*\//, "");
   
7.                 else sub(/\/\*.*/, "");
   
8.                 print;
   
9. 
   
10.                 while (getline == 1 && !($0~/\*\//));
    
11.                
    
12.                 sub(/.*\*\//, "");
    
13. 
    
14. 
    
15.         } else if ($0~/\/\//) sub(/\/\/.*/, "");
    
16. 
    
17.         if ($0~/\/\*/) clearComment();
    
18.         else print;
    
19. }
    
20. 
    
21. {
    
22.         clearComment();
    
23. }' foo.c

复制代码

【awk就是awp加ak】，sed：

1. sed '
   
2.         s%//.*%%
   
3. 
   
4.         /\/\*/{
   
5.         :next
   
6.                 N
   
7.                 /\*\//!b next
   
8.                 s%/\*.*\*/%^M%
   
9.         }
   
10.         /\/\*/b next
    
11. ' foo.c

复制代码

【qqq112233g】，sed：

1. sed -n 'H;${g;s#/\*[^*]*\*/##g;s/\n *\n//g;p}' foo.c

复制代码

【lovesaka】，perl：

1. perl -ne 'if(/\/\*/&&/\*\//||/^$/){print if(s/\/\*.*\*\/// && !/^\s+$/);next}elsif(/\/\*/){$flag=1;print if(s/\/\*.*$// && !/^\s+$/); next}elsif(/\*\//){$flag=0;print if(s/^.*\*\/// && !/^\s+$/);next}else{next if($flag);print}' foo.c

复制代码

【windwiny】，perl脚本：

1. #!/usr/bin/perl -w
   
2. 
   
3. # move C/C++ source file all comment
   
4. #    CopyError(R) windwiny.  #### NO ANY WARRANTY ####
   
5. #
   
6. # Usage:
   
7. #        mvcommen.pl < aaa.c > bbb.c
   
8. #
   
9. 
   
10. $cc1=0;        # line comment and \ ended;
    
11. $cc2=0; # block comment begin but no end blocked.
    
12. while (<>)
    
13. {
    
14. # aaa // bbb ccc \
    
15. # ddd eee \
    
16. # fff
    
17.         if ($cc1 !=0)
    
18.         {
    
19.                 if (m/(.*)(\\$)/)
    
20.                 {
    
21.                         next;
    
22.                 }
    
23.                 else
    
24.                 {
    
25.                         $cc1=0;
    
26.                         next;
    
27.                 }
    
28.         }
    
29.         if (s/(.*?)(\/\/.*)(\\$)/$1/)
    
30.         {
    
31.                 print ;
    
32.                 $cc1=1;
    
33.                 next;
    
34.         }
    
35.                
    
36. # aaa // bbb ccc // ddd /* eee */ ... except above 's case
    
37.         s/(.*?)(\/\/.*$)/$1/;        # NOT next
    
38. 
    
39. # aaa /* bbb ccc
    
40. # ddd eee
    
41. # fff */ ggg
    
42.         if ($cc2 !=0)
    
43.         {
    
44. # ? WARRING: disable /* /* */ */'s style comment
    
45.                 if (s/(.*?)(\*\/)(.*)/$3/)
    
46.                 {
    
47.                         print ;
    
48.                         $cc2=0;
    
49.                         next;
    
50.                 }
    
51.                 next;
    
52.         }
    
53. # aaa /* bbb */ ccc
    
54.         if (s/(.*?)(\/\*.*?\*\/)(.*)/$1$3/)
    
55.         {
    
56.                 print ;
    
57.                 next;
    
58.         }
    
59. #   --> join up  #### CAN NOT move above 's if above ####
    
60.         if (s/(.*?)(\/\*.*$)/$1/)
    
61.         {
    
62.                 print ;
    
63.                 $cc2=1;
    
64.                 next;
    
65.         }
    
66. 
    
67. # Other case:
    
68. # aaa /* bbb
    
69. #   ccc */ ddd; /* eee */ or // fff
    
70. #   This is too BT,can not moved.  :-(
    
71. 
    
72. # default
    
73.         print;
    
74. }
    
75. 
    
76. # vim:ts=4:sts=4:sw=4:cin

复制代码

【Namelessxp】，perl脚本：

1. #!/usr/bin/perl
   
2. use warnings;
   
3. use strict;
   
4. $/ = undef;
   
5. while (<>){
   
6.         $_ =~ s/\/\*.*?\*\///igs;
   
7.         $_ =~ s/(\r?\n)+/\n/igs;
   
8.         print;
   
9. }
   
10. exit;

复制代码

【li-jiahuan】，perl：

1. perl -0777 -pe 's{/\*.*?\*/}{}gs' foo.c

复制代码

【li-jiahuan】，perl脚本：

1.     $/ = undef;
   
2.     $_ = <>;
   
3.     s#/\*[^*]*\*+([^/*][^*]*\*+)*/|("(\\.|[^"\\])*"|'(\\.|[^'\\])*'|\n+|.[^/"'\\]*)#$2#g;
   
4.     print;

复制代码

【mq110】，lex脚本：

1. %{
   
2. #include <stdio.h>
   
3. void  comment();
   
4. int yywrap()
   
5. {
   
6.         return 1;
   
7. }
   
8. %}
   
9. %%
   
10. "/*"  {comment(); }
    
11. .  {printf("%c",yytext[0]);}
    
12. %%
    
13. void comment()
    
14. {
    
15.         for(;;)
    
16.         {
    
17.                 while (input()!='*');
    
18.                 if(input()!='/')
    
19.                         unput(yytext[yyleng-1]);
    
20.                 else
    
21.                         return;
    
22.         }
    
23. }

复制代码

【gvim】，lex脚本：

1. %{
   
2. %}
   
3. comment  "/*"([^\*]|(\*)*[^\*/])*(\*)*"*/"
   
4. %%
   
5. {comment} {  }
   
6. %%

复制代码

【emacsnw】，c程序：

1. /*
   
2. * Removes comments from C codes.
   
3. */
   
4. 
   
5. #include <stdio.h>
   
6. 
   
7. typedef enum {
   
8.     FA_NORMAL,  /* normal texts     */
   
9.     FA_QUOTE,   /* inside a string  */
   
10.     FA_META,    /* meta character \ */
    
11.     FA_BSLASH,  /* after /          */
    
12.     FA_COMMENT, /* inside comments  */
    
13.     FA_STAR     /* after *          */
    
14. } FA_STATE;
    
15. 
    
16. int main(int argc, char *argv[])
    
17. {
    
18.     FILE *fp;
    
19.     int ch;
    
20.     FA_STATE state;
    
21. 
    
22.     if (argc < 2) {
    
23.         fprintf(stderr, "Not enough arguments.\n"
    
24.                 "Must specify the C source file.\n");
    
25.         exit(-1);
    
26.     }
    
27.     if ((fp = fopen(argv[1], "r")) == NULL) {
    
28.         fprintf(stderr, "Can't open %s.\n", argv[1]);
    
29.         exit(-1);
    
30.     }
    
31.     state = FA_NORMAL;
    
32.     while ((ch = fgetc(fp)) != EOF) {
    
33.         switch (state) {
    
34.         start_over:
    
35.         case FA_NORMAL:
    
36.             if (ch == '"') {
    
37.                 putchar(ch);
    
38.                 state = FA_QUOTE;
    
39.             } else if (ch == '/')
    
40.                 state = FA_BSLASH;
    
41.             else
    
42.                 putchar(ch);
    
43.             break;
    
44.         case FA_QUOTE:
    
45.             if (ch == '\\') {
    
46.                 putchar(ch);
    
47.                 state = FA_META;
    
48.             } else if (ch == '"') {
    
49.                 putchar(ch);
    
50.                 state = FA_NORMAL;
    
51.             } else
    
52.                 putchar(ch);
    
53.             break;
    
54.         case FA_META:
    
55.             putchar(ch);
    
56.             state = FA_QUOTE;
    
57.             break;
    
58.         case FA_BSLASH:
    
59.             if (ch == '*')
    
60.                 state = FA_COMMENT;
    
61.             else {
    
62.                 putchar('/'); /* restore the previous ch */
    
63.                 state = FA_NORMAL;
    
64.                 goto start_over;
    
65.             }
    
66.             break;
    
67.         case FA_COMMENT:
    
68.             if (ch == '*')
    
69.                 state = FA_STAR;
    
70.             break;
    
71.         case FA_STAR:
    
72.             if (ch == '/')
    
73.                 state = FA_NORMAL;
    
74.             else if (ch == '*')
    
75.                 state = FA_STAR;
    
76.             else
    
77.                 state = FA_COMMENT;
    
78.             break;
    
79.         }
    
80.     }
    
81.     exit(0);
    
82. }

复制代码

期待大家继续提出其它的解决方法！

[ 本帖最后由 雨丝风片 于 2006-10-26 08:35 编辑 ]