| lists.openwall.net | lists / announce owl-users owl-dev john-users john-dev passwdqc-users yescrypt popa3d-users / oss-security kernel-hardening musl sabotage tlsify passwords / crypt-dev xvendor / Bugtraq Full-Disclosure linux-kernel linux-netdev linux-ext4 linux-hardening linux-cve-announce PHC | |
|
Open Source and information security mailing list archives
| ||
|
Message-ID: <1346713972.2312.2.camel@Cruz-PC>
Date: Tue, 04 Sep 2012 09:12:52 +1000
From: Cruz Julian Bishop <cruzjbishop@...il.com>
To: mcgrof@...il.com
Cc: linux-kernel@...r.kernel.org
Subject: Re: [PATCH 5/5] scripts/checkincludes.pl: Replace tabs with spaces
My bad, misread the documentation files.
I'll resubmit without this
On Tue, 2012-09-04 at 08:20 +1000, Cruz Julian Bishop wrote:
> This is required by the CodingStyle kernel documentation file
>
> Signed-off-by: Cruz Julian Bishop <cruzjbishop@...il.com>
> ---
> scripts/checkincludes.pl | 122 +++++++++++++++++++++++------------------------
> 1 file changed, 61 insertions(+), 61 deletions(-)
>
> diff --git a/scripts/checkincludes.pl b/scripts/checkincludes.pl
> index bff7316..7e3df9e 100755
> --- a/scripts/checkincludes.pl
> +++ b/scripts/checkincludes.pl
> @@ -14,7 +14,7 @@
> use strict;
>
> sub usage {
> - print <<EOM;
> + print <<EOM;
> Usage: checkincludes.pl [OPTIONS]... FILE...
> By default, we just warn of duplicates.
>
> @@ -23,84 +23,84 @@ Options:
> -q Do not show messages for files that do not
> have duplicated includes
> EOM
> - exit 1;
> + exit 1;
> }
>
> my $remove = 0;
> my $quiet = 0;
>
> if ($#ARGV < 0) {
> - usage();
> + usage();
> }
>
> my $argc = 0;
>
> foreach my $arg (@ARGV) {
> - if ($arg eq "-r") {
> - $remove = 1;
> - } elsif($arg eq "-q") {
> - $quiet = 1;
> - } else {
> - open(my $f, '<', $arg)
> - or die "Cannot open $arg: $!.\n";
> -
> - $argc++;
> + if ($arg eq "-r") {
> + $remove = 1;
> + } elsif($arg eq "-q") {
> + $quiet = 1;
> + } else {
> + open(my $f, '<', $arg)
> + or die "Cannot open $arg: $!.\n";
> +
> + $argc++;
>
> - my %includedfiles = ();
> - my @file_lines = ();
> + my %includedfiles = ();
> + my @file_lines = ();
>
> - while (<$f>) {
> - if (m/^\s*#\s*include\s*[<"](\S*)[>"]/o) {
> - ++$includedfiles{$1};
> - }
> - push(@file_lines, $_);
> - }
> + while (<$f>) {
> + if (m/^\s*#\s*include\s*[<"](\S*)[>"]/o) {
> + ++$includedfiles{$1};
> + }
> + push(@file_lines, $_);
> + }
>
> - close($f);
> + close($f);
>
> - if (!$remove) {
> - my $detected = 0;
> - foreach my $filename (keys %includedfiles) {
> - if ($includedfiles{$filename} > 1) {
> - $detected++;
> - print "$arg: $filename is included more than once.\n";
> - }
> - }
> - if (!$detected && !$quiet) {
> - print "$arg: No duplicated includes detected.\n";
> - }
> - next;
> - }
> + if (!$remove) {
> + my $detected = 0;
> + foreach my $filename (keys %includedfiles) {
> + if ($includedfiles{$filename} > 1) {
> + $detected++;
> + print "$arg: $filename is included more than once.\n";
> + }
> + }
> + if (!$detected && !$quiet) {
> + print "$arg: No duplicated includes detected.\n";
> + }
> + next;
> + }
>
> - open($f, '>', $arg)
> - or die("Cannot write to $arg: $!");
> + open($f, '>', $arg)
> + or die("Cannot write to $arg: $!");
>
> - my $dups = 0;
> - foreach(@file_lines) {
> - if (m/^\s*#\s*include\s*[<"](\S*)[>"]/o) {
> - foreach my $filename (keys %includedfiles) {
> - if ($1 eq $filename) {
> - if ($includedfiles{$filename} > 1) {
> - $includedfiles{$filename}--;
> - $dups++;
> - } else {
> - print {$f} $_;
> - }
> - }
> - }
> - } else {
> - print {$f} $_;
> - }
> - }
> - if ($dups > 0) {
> - print "$arg: removed $dups duplicate includes \n";
> - } elsif (!$quiet) {
> - print "$arg: no duplicated includes to remove \n";
> - }
> - close($f);
> - }
> + my $dups = 0;
> + foreach(@file_lines) {
> + if (m/^\s*#\s*include\s*[<"](\S*)[>"]/o) {
> + foreach my $filename (keys %includedfiles) {
> + if ($1 eq $filename) {
> + if ($includedfiles{$filename} > 1) {
> + $includedfiles{$filename}--;
> + $dups++;
> + } else {
> + print {$f} $_;
> + }
> + }
> + }
> + } else {
> + print {$f} $_;
> + }
> + }
> + if ($dups > 0) {
> + print "$arg: removed $dups duplicate includes \n";
> + } elsif (!$quiet) {
> + print "$arg: no duplicated includes to remove \n";
> + }
> + close($f);
> + }
> }
>
> if ($argc == 0) {
> - usage();
> + usage();
> }
--
To unsubscribe from this list: send the line "unsubscribe linux-kernel" in
the body of a message to majordomo@...r.kernel.org
More majordomo info at http://vger.kernel.org/majordomo-info.html
Please read the FAQ at http://www.tux.org/lkml/
Powered by blists - more mailing lists