commit e8760b6e51e9320ae039b3521b5b984e2bd8ac0c Author: cypherpunks cypherpunks@torproject.org Date: Thu Dec 15 11:19:05 2016 +0000
Use the new message function
Substitutions were made using `sed -e 's/print/msg/g'`. --- scripts/maint/checkSpace.pl | 46 ++++++++++++++++++++++----------------------- 1 file changed, 23 insertions(+), 23 deletions(-)
diff --git a/scripts/maint/checkSpace.pl b/scripts/maint/checkSpace.pl index 0249c09..6d19d6c 100755 --- a/scripts/maint/checkSpace.pl +++ b/scripts/maint/checkSpace.pl @@ -27,33 +27,33 @@ for my $fn (@ARGV) { # (We insist on lines that end with a single LF character, not # CR LF.) if (/\r/) { - print " CR:$fn:$.\n"; + msg " CR:$fn:$.\n"; } ## Warn about tabs. # (We only use spaces) if (/\t/) { - print " TAB:$fn:$.\n"; + msg " TAB:$fn:$.\n"; } ## Warn about labels that don't have a space in front of them # (We indent every label at least one space) if (/^[a-zA-Z_][a-zA-Z_0-9]*:/) { - print "nosplabel:$fn:$.\n"; + msg "nosplabel:$fn:$.\n"; } ## Warn about trailing whitespace. # (We don't allow whitespace at the end of the line; make your # editor highlight it for you so you can stop adding it in.) if (/ +$/) { - print "Space@EOL:$fn:$.\n"; + msg "Space@EOL:$fn:$.\n"; } ## Warn about control keywords without following space. # (We put a space after every 'if', 'while', 'for', 'switch', etc) if ($C && /\s(?:if|while|for|switch)(/) { - print " KW(:$fn:$.\n"; + msg " KW(:$fn:$.\n"; } ## Warn about #else #if instead of #elif. # (We only allow #elif) if (($lastline =~ /^# *else/) and ($_ =~ /^# *if/)) { - print " #else#if:$fn:$.\n"; + msg " #else#if:$fn:$.\n"; } ## Warn about some K&R violations # (We use K&R-style C, where open braces go on the same line as @@ -65,22 +65,22 @@ for my $fn (@ARGV) { # } if (/^\s+{/ and $lastline =~ /^\s*(if|while|for|else if)/ and $lastline !~ /{$/) { - print "non-K&R {:$fn:$.\n"; + msg "non-K&R {:$fn:$.\n"; } if (/^\s*else/ and $lastline =~ /}$/) { - print " }\nelse:$fn:$.\n"; + msg " }\nelse:$fn:$.\n"; } $lastline = $_; ## Warn about unnecessary empty lines. # (Don't put an empty line before a line that contains nothing # but a closing brace.) if ($lastnil && /^\s*}\n/) { - print " UnnecNL:$fn:$.\n"; + msg " UnnecNL:$fn:$.\n"; } ## Warn about multiple empty lines. # (At most one blank line in a row.) if ($lastnil && /^$/) { - print " DoubleNL:$fn:$.\n"; + msg " DoubleNL:$fn:$.\n"; } elsif (/^$/) { $lastnil = 1; } else { @@ -90,7 +90,7 @@ for my $fn (@ARGV) { ## accept double-line lines. # (Don't make lines wider than 80 characters, including newline.) if (/^.{80}/) { - print " Wide:$fn:$.\n"; + msg " Wide:$fn:$.\n"; } ### Juju to skip over comments and strings, since the tests ### we're about to do are okay there. @@ -115,22 +115,22 @@ for my $fn (@ARGV) { ## Warn about C++-style comments. # (Use C style comments only.) if (m!//!) { - # print " //:$fn:$.\n"; + # msg " //:$fn:$.\n"; s!//.*!!; } ## Warn about unquoted braces preceded by non-space. # (No character except a space should come before a {) if (/([^\s']){/) { - print " $1{:$fn:$.\n"; + msg " $1{:$fn:$.\n"; } ## Warn about multiple internal spaces. #if (/[^\s,:]\s{2,}[^\s\=]/) { - # print " X X:$fn:$.\n"; + # msg " X X:$fn:$.\n"; #} ## Warn about { with stuff after. #s/\s+$//; #if (/{[^}\]+$/) { - # print " {X:$fn:$.\n"; + # msg " {X:$fn:$.\n"; #} ## Warn about function calls with space before parens. # (Don't put a space between the name of a function and its @@ -142,7 +142,7 @@ for my $fn (@ARGV) { $1 ne "void" and $1 ne "__attribute__" and $1 ne "op" and $1 ne "size_t" and $1 ne "double" and $1 ne "workqueue_reply_t") { - print " fn ():$fn:$.\n"; + msg " fn ():$fn:$.\n"; } } ## Warn about functions not declared at start of line. @@ -154,7 +154,7 @@ for my $fn (@ARGV) { ! /^(?:const |static )*(?:typedef|struct|union)[^(]*$/ && ! /= *{$/ && ! /;$/)) { if (/.{$/){ - print "fn() {:$fn:$.\n"; + msg "fn() {:$fn:$.\n"; $in_func_head = 0; } elsif (/^\S[^(]* +**[a-zA-Z0-9_]+(/) { $in_func_head = -1; # started with tp fn @@ -162,7 +162,7 @@ for my $fn (@ARGV) { $in_func_head = 0; } elsif (/{/) { if ($in_func_head == -1) { - print "tp fn():$fn:$.\n"; + msg "tp fn():$fn:$.\n"; } $in_func_head = 0; } @@ -171,19 +171,19 @@ for my $fn (@ARGV) { ## Check for forbidden functions except when they are # explicitly permitted if (/\bassert(/ && not /assert OK/) { - print "assert :$fn:$. (use tor_assert)\n"; + msg "assert :$fn:$. (use tor_assert)\n"; } if (/\bmemcmp(/ && not /memcmp OK/) { - print "memcmp :$fn:$. (use {tor,fast}_mem{eq,neq,cmp}\n"; + msg "memcmp :$fn:$. (use {tor,fast}_mem{eq,neq,cmp}\n"; } # always forbidden. if (not /\ OVERRIDE\ /) { if (/\bstrcat(/ or /\bstrcpy(/ or /\bsprintf(/) { - print "$& :$fn:$.\n"; + msg "$& :$fn:$.\n"; } if (/\bmalloc(/ or /\bfree(/ or /\brealloc(/ or /\bstrdup(/ or /\bstrndup(/ or /\bcalloc(/) { - print "$& :$fn:$. (use tor_malloc, tor_free, etc)\n"; + msg "$& :$fn:$. (use tor_malloc, tor_free, etc)\n"; } } } @@ -191,7 +191,7 @@ for my $fn (@ARGV) { ## Warn if the file doesn't end with a blank line. # (End each file with a single blank line.) if (! $lastnil) { - print " EOL@EOF:$fn:$.\n"; + msg " EOL@EOF:$fn:$.\n"; } close(F); }