[<prev] [next>] [<thread-prev] [thread-next>] [day] [month] [year] [list]
Message-ID: <20150604120520.GO3135@pathway.suse.cz>
Date: Thu, 4 Jun 2015 14:05:20 +0200
From: Petr Mladek <pmladek@...e.cz>
To: Joe Perches <joe@...ches.com>
Cc: Andrew Morton <akpm@...ux-foundation.org>,
Andy Whitcroft <apw@...onical.com>,
linux-kernel@...r.kernel.org
Subject: Re: [PATCH 2/3] checkpatch: colorize output to terminal
On Wed 2015-06-03 08:53:39, Joe Perches wrote:
> Add optional colors to make seeing message types a bit easier.
>
> Add --color command line switch, default:on
>
> Error is RED, warning is YELLOW, check is GREEN.
> The message type, if shown, is BLUE.
>
> Signed-off-by: Joe Perches <joe@...ches.com>
Tested-by: Petr Mladek <pmladek@...e.cz>
I like it. It really helps noticing the problems.
Best Regards,
Petr
> ---
> scripts/checkpatch.pl | 27 +++++++++++++++++++++------
> 1 file changed, 21 insertions(+), 6 deletions(-)
>
> diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl
> index eaa76bd..cef2cd4 100755
> --- a/scripts/checkpatch.pl
> +++ b/scripts/checkpatch.pl
> @@ -9,6 +9,7 @@ use strict;
> use POSIX;
> use File::Basename;
> use Cwd 'abs_path';
> +use Term::ANSIColor qw(:constants);
>
> my $P = $0;
> my $D = dirname(abs_path($P));
> @@ -49,6 +50,7 @@ my $min_conf_desc_length = 4;
> my $spelling_file = "$D/spelling.txt";
> my $codespell = 0;
> my $codespellfile = "/usr/local/share/codespell/dictionary.txt";
> +my $color = 1;
>
> sub help {
> my ($exitcode) = @_;
> @@ -93,6 +95,7 @@ Options:
> --codespell Use the codespell dictionary for spelling/typos
> (default:/usr/local/share/codespell/dictionary.txt)
> --codespellfile Use this codespell dictionary
> + --color Use colors when output is STDOUT (default: on)
> -h, --help, --version display this help and exit
>
> When FILE is - read standard input.
> @@ -153,6 +156,7 @@ GetOptions(
> 'test-only=s' => \$tst_only,
> 'codespell!' => \$codespell,
> 'codespellfile=s' => \$codespellfile,
> + 'color!' => \$color,
> 'h|help' => \$help,
> 'version' => \$help
> ) or help(1);
> @@ -1672,15 +1676,26 @@ sub report {
> (defined $tst_only && $msg !~ /\Q$tst_only\E/)) {
> return 0;
> }
> - my $line;
> + my $output = '';
> + if (-t STDOUT && $color) {
> + if ($level eq 'ERROR') {
> + $output .= RED;
> + } elsif ($level eq 'WARNING') {
> + $output .= YELLOW;
> + } else {
> + $output .= GREEN;
> + }
> + }
> + $output .= $prefix . $level . ':';
> if ($show_types) {
> - $line = "$prefix$level:$type: $msg\n";
> - } else {
> - $line = "$prefix$level: $msg\n";
> + $output .= BLUE if (-t STDOUT && $color);
> + $output .= "$type:";
> }
> - $line = (split('\n', $line))[0] . "\n" if ($terse);
> + $output .= RESET if (-t STDOUT && $color);
> + $output .= ' ' . $msg . "\n";
> + $output = (split('\n', $output))[0] . "\n" if ($terse);
>
> - push(our @report, $line);
> + push(our @report, $output);
>
> return 1;
> }
> --
> 2.1.2
>
--
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