Jak mogę usunąć wszystkie/* */komentarze z pliku źródłowego C?

Question

Mam plik C którego skopiowany z innego miejsca, ale ma wiele uwag jak poniżej:

int matrix[20]; 
/* generate data */ 
for (index = 0 ;index < 20; index++) 
matrix[index] = index + 1; 
/* print original data */ 
for (index = 0; index < 5 ;index++) 

Jak mogę usunąć wszystkie komentarze zamknięte przez /* i */. Czasami komentarze składają się z 4-5 linii i muszę usunąć wszystkie te linie.

Zasadniczo muszę usunąć cały tekst między /* i */, a nawet \n może wejść pomiędzy. Pomóż mi to zrobić, używając jednego z sed, awk lub perl.

Answer 1

Dlaczego po prostu nie użyć preprocesora c, aby to zrobić? Dlaczego ograniczasz się do rodzimego regexu?

[Edycja] To podejście prowadzi również barts printf(".../*...") scenariusz czysto

przykład:

[File: t.c] 
/* This is a comment */ 
int main() { 
    /* 
    * This 
    * is 
    * a 
    * multiline 
    * comment 
    */ 
    int f = 42; 
    /* 
    * More comments 
    */ 
    return 0; 
} 

.

$ cpp -P t.c 
int main() { 







    int f = 42; 



    return 0; 
} 

Albo można usunąć spacje i skondensować wszystko

$ cpp -P t.c | egrep -v "^[ \t]*$" 
int main() { 
    int f = 42; 
    return 0; 
} 

bezużyteczna ponowne wynalezienie koła, tam jest?

[Edytuj] Jeśli chcesz nie poszerzyć dołączonych plików i macroa przez tego podejścia cpp zapewnia flagi do tego. Rozważmy:

[File: T.C.]

#include <stdio.h> 
int main() { 
    int f = 42; 
    printf(" /* "); 
    printf(" */ "); 
    return 0; 
} 

.

$ cpp -P -fpreprocessed t.c | grep -v "^[ \t]*$" 
#include <stdio.h> 
int main() { 
    int f = 42; 
    printf(" /* "); 
    printf(" */ "); 
    return 0; 
} 

nie jest można uniknąć niewielkie zastrzeżenie w tym makr, ale przy definicji makro jest usuwany ze źródła.

Answer 2

Zobacz perlfaq6. To dość skomplikowany scenariusz.

$/ = undef; 
$_ = <>; 
s#/\*[^*]*\*+([^/*][^*]*\*+)*/|("(\\.|[^"\\])*"|'(\\.|[^'\\])*'|.[^/"'\\]*)#defined $2 ? $2 : ""#gse; 
print; 

Słowo ostrzeżenia - raz już to zrobisz, masz scenariusz testowy, aby udowodnić sobie, że właśnie usunięte komentarze i nic wartościowego? Jeśli używasz tak potężnego wyrażenia regularnego, zapewniłbym pewien test (nawet jeśli po prostu nagrasz zachowanie przed/po).

Answer 3

bardzo uproszczony przykład użycia gawk. Proszę przetestować wiele razy przed wdrożeniem. Oczywiście nie dbać o innych uwag stylu // (w C++ ??)

$ more file 
int matrix[20]; 
/* generate data */ 
for (index = 0 ;index < 20; index++) 
matrix[index] = index + 1; 
/* print original data */ 
for (index = 0; index < 5 ;index++) 
/* 
function(){ 
blah blah 
} 
*/ 
float a; 
float b; 

$ awk -vRS='*/' '{ gsub(/\/\*.*/,"")}1' file 
int matrix[20]; 


for (index = 0 ;index < 20; index++) 
matrix[index] = index + 1; 


for (index = 0; index < 5 ;index++) 


float a; 
float b; 

Answer 4

Spróbuj to w wierszu poleceń (zastępując „file-nazwy” z listą plików, które muszą być przetworzone):

perl -i -wpe 'BEGIN{undef $/} s!/\*.*?\*/!!sg' file-names 

Ten program zmienia pliki w miejscu (zastępując oryginalny plik poprawionymi danymi wyjściowymi). Jeśli chcesz tylko dane wyjściowe bez zmiany oryginalnych plików, pomiń przełącznik "-i".

Objaśnienie:

perl -- call the perl interpreter 
-i  switch to 'change-in-place' mode. 
-w  print warnings to STDOUT (if there are any) 
p  read the files and print $_ for each record; like while(<>){ ...; print $_;} 
e  process the following argument as a program (once for each input record) 

BEGIN{undef $/} --- process whole files instead of individual lines. 
s!  search and replace ... 
    /\*  the starting /* marker 
    .*?  followed by any text (not gredy search) 
    \*/  followed by the */ marker 
!!  replace by the empty string (i.e. remove comments) 
    s  treat newline characters \n like normal characters (remove multi-line comments) 
    g repeat as necessary to process all comments. 

file-names list of files to be processed. 

Answer 5

Spójrz na strip_comments routine in Inline::Filters:

sub strip_comments { 
    my ($txt, $opn, $cls, @quotes) = @_; 
    my $i = -1; 
    while (++$i < length $txt) { 
    my $closer; 
     if (grep {my $r=substr($txt,$i,length($_)) eq $_; $closer=$_ if $r; $r} 
     @quotes) { 
     $i = skip_quoted($txt, $i, $closer); 
     next; 
     } 
     if (substr($txt, $i, length($opn)) eq $opn) { 
     my $e = index($txt, $cls, $i) + length($cls); 
     substr($txt, $i, $e-$i) =~ s/[^\n]/ /g; 
     $i--; 
     next; 
     } 
    } 
    return $txt; 
} 

Answer 6

Rozważmy:

printf("... /* ..."); 
int matrix[20]; 
printf("... */ ..."); 

Innymi słowy: nie będę używać tego wyrażenia regularnego zadanie, chyba że robisz replikę ace-once i są pozytywne, że powyższe nie występuje.

Answer 7

Proszę nie używać cpp za to chyba rozumiesz konsekwencje:

$ cat t.c 
#include <stdio.h> 

#define MSG "Hello World" 

int main(void) { 
    /* ANNOY: print MSG using the puts function */ 
    puts(MSG); 
    return 0; 
} 

Teraz niech go uruchomić poprzez cpp:

$ cpp -P t.c -fpreprocessed 


#include <stdio.h> 



int main(void) { 


    puts(MSG); 
    return 0; 
} 

Oczywiście, ten plik nie jest już zamiar skompilować.

Answer 8

Gdy chcę coś krótkie i proste dla CSS, używam to:

awk -vRS='*/' '{gsub(/\/\*.*/,"")}1' FILE 

To nie zajmie się przypadek, w którym komentarz ograniczniki pojawić wewnątrz sznurki, ale jest to znacznie prostsze niż rozwiązanie, które robi. Oczywiście nie jest to kuloodporna lub nadaje się do wszystkiego, ale wiesz lepiej niż pedanci na SO, czy możesz z tym żyć.

Wierzę, this onejest kuloodporna jednak.

Answer 9

MUSISZ używać preprocesora C do tego w połączeniu z innymi narzędziami do tymczasowego wyłączenia określonych funkcji preprocesora, takich jak rozszerzanie #defines lub #includes, wszystkie inne podejścia będą nieskuteczne w przypadkach krawędzi. To będzie działać we wszystkich przypadkach:

[ $# -eq 2 ] && arg="$1" || arg="" 
eval file="\$$#" 
sed 's/a/aA/g;s/__/aB/g;s/#/aC/g' "$file" | 
      gcc -P -E $arg - | 
      sed 's/aC/#/g;s/aB/__/g;s/aA/a/g' 

Umieścić go w skrypcie powłoki i wywołać ją z nazwą pliku, który ma zostać przetworzony, ewentualnie poprzedzony flagą jak „-ansi”, aby określić standard C do zastosowania .

Answer 10

Spróbuj poniżej rekurencyjny sposób znajdowania i usuwania komentarzy Java script type, typ XML Komentarze i jeden wiersz komentarze

/* This is a multi line js comments. 

Please remove me*/ 

dla F w find pages/ -name "*.*"; do perl -i -wpe 'BEGIN {undef $ /} s! /*.*? */!! sg' $ f; wykonano:

<!-- This is a multi line xml comments. 

Please remove me --> 

dla fw find pages/ -name "*.*"; do perl -i -wpe 'BEGIN {undef $ /} s! <! -. *? -> !!sg '$ f; wykonano:

//This is single line comment Please remove me. 

dla fw find pages/ -name "*.*"; do sed -i 's ///.*//' $ f; Sporządzono:

Uwaga: strony są katalogiem głównym, a powyższy skrypt znajdzie i usunie wszystkie pliki znajdujące się w katalogach głównym i podrzędnym.