lkml.org 
[lkml]   [2013]   [Dec]   [26]   [last100]   RSS Feed
Views: [wrap][no wrap]   [headers]  [forward] 
 
Messages in this thread
/
Date
From
SubjectRe: [PATCH 2/5] checkpatch: Add a --fix-inplace option
On Thu, Dec 26, 2013 at 11:20:29AM -0800, Joe Perches wrote:
> Add the ability to fix and overwrite existing files/patches instead
> of creating a new file "<filename>.EXPERIMENTAL-checkpatch-fixes".
>
> Suggested-by: Manfred Spraul <manfred@colorfullife.com>
> Signed-off-by: Joe Perches <joe@perches.com>

Reviewed-by: Josh Triplett <josh@joshtriplett.org>

> scripts/checkpatch.pl | 10 +++++++++-
> 1 file changed, 9 insertions(+), 1 deletion(-)
>
> diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl
> index f5d4560..19376b4 100755
> --- a/scripts/checkpatch.pl
> +++ b/scripts/checkpatch.pl
> @@ -29,6 +29,7 @@ my $mailback = 0;
> my $summary_file = 0;
> my $show_types = 0;
> my $fix = 0;
> +my $fix_inplace = 0;
> my $root;
> my %debug;
> my %camelcase = ();
> @@ -76,6 +77,9 @@ Options:
> "<inputfile>.EXPERIMENTAL-checkpatch-fixes"
> with potential errors corrected to the preferred
> checkpatch style
> + --fix-inplace EXPERIMENTAL - may create horrible results
> + Is the same as --fix, but overwrites the input
> + file. It's your fault if there's no backup or git
> --ignore-perl-version override checking of perl version. expect
> runtime errors.
> -h, --help, --version display this help and exit
> @@ -131,6 +135,7 @@ GetOptions(
> 'mailback!' => \$mailback,
> 'summary-file!' => \$summary_file,
> 'fix!' => \$fix,
> + 'fix-inplace!' => \$fix_inplace,
> 'ignore-perl-version!' => \$ignore_perl_version,
> 'debug=s' => \%debug,
> 'test-only=s' => \$tst_only,
> @@ -140,6 +145,8 @@ GetOptions(
>
> help(0) if ($help);
>
> +$fix = 1 if ($fix_inplace);
> +
> my $exit = 0;
>
> if ($^V && $^V lt $minimum_perl_version) {
> @@ -4456,7 +4463,8 @@ sub process {
> hash_show_words(\%ignore_type, "Ignored");
>
> if ($clean == 0 && $fix && "@rawlines" ne "@fixed") {
> - my $newfile = $filename . ".EXPERIMENTAL-checkpatch-fixes";
> + my $newfile = $filename;
> + $newfile .= ".EXPERIMENTAL-checkpatch-fixes" if (!$fix_inplace);
> my $linecount = 0;
> my $f;
>
> --
> 1.8.1.2.459.gbcd45b4.dirty
>


\
 
 \ /
  Last update: 2013-12-26 21:21    [W:0.071 / U:2.776 seconds]
©2003-2020 Jasper Spaans|hosted at Digital Ocean and TransIP|Read the blog|Advertise on this site