streamline_config.pl: make spacing consistent

Patch series "streamline_config.pl: Fix Perl spacing".

Talking with John Hawley about how vim and emacs deal with Perl files with
respect to tabs and spaces, I found that some of my Perl code in the
kernel had inconsistent spacing.  The way emacs handles Perl by default is
to use 4 spaces per indent, but make all 8 spaces into a single tab.  Vim
does not do this by default.  But if you add the vim variable control:

 # vim: softtabstop=4

to a perl file, it makes vim behave the same way as emacs.

The first patch is to change all 8 spaces into a single tab (mostly from
people editing the file with vim).  The next patch adds the softtabstop
variable to make vim act like emacs by default.

This patch (of 2):

As Perl code tends to have 4 space indentation, but uses tabs for every 8
spaces, make that consistent in the streamline_config.pl code.  Replace
all 8 spaces with a single tab.

Link: https://lkml.kernel.org/r/20210322214032.133596267@goodmis.org
Signed-off-by: Steven Rostedt (VMware) <rostedt@goodmis.org>
Cc: "John (Warthog9) Hawley" <warthog9@kernel.org>
Cc: Masahiro Yamada <masahiroy@kernel.org>
Signed-off-by: Andrew Morton <akpm@linux-foundation.org>
Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
This commit is contained in:
Steven Rostedt (VMware) 2021-06-28 19:33:44 -07:00 committed by Linus Torvalds
parent c5f320ff8a
commit b83c8ba40c

View File

@ -601,12 +601,12 @@ if (defined($ENV{'LMC_KEEP'})) {
sub in_preserved_kconfigs { sub in_preserved_kconfigs {
my $kconfig = $config2kfile{$_[0]}; my $kconfig = $config2kfile{$_[0]};
if (!defined($kconfig)) { if (!defined($kconfig)) {
return 0; return 0;
} }
foreach my $excl (@preserved_kconfigs) { foreach my $excl (@preserved_kconfigs) {
if($kconfig =~ /^$excl/) { if($kconfig =~ /^$excl/) {
return 1; return 1;
} }
} }
return 0; return 0;
} }
@ -629,52 +629,52 @@ foreach my $line (@config_file) {
} }
if (/CONFIG_MODULE_SIG_KEY="(.+)"/) { if (/CONFIG_MODULE_SIG_KEY="(.+)"/) {
my $orig_cert = $1; my $orig_cert = $1;
my $default_cert = "certs/signing_key.pem"; my $default_cert = "certs/signing_key.pem";
# Check that the logic in this script still matches the one in Kconfig # Check that the logic in this script still matches the one in Kconfig
if (!defined($depends{"MODULE_SIG_KEY"}) || if (!defined($depends{"MODULE_SIG_KEY"}) ||
$depends{"MODULE_SIG_KEY"} !~ /"\Q$default_cert\E"/) { $depends{"MODULE_SIG_KEY"} !~ /"\Q$default_cert\E"/) {
print STDERR "WARNING: MODULE_SIG_KEY assertion failure, ", print STDERR "WARNING: MODULE_SIG_KEY assertion failure, ",
"update needed to ", __FILE__, " line ", __LINE__, "\n"; "update needed to ", __FILE__, " line ", __LINE__, "\n";
print; print;
} elsif ($orig_cert ne $default_cert && ! -f $orig_cert) { } elsif ($orig_cert ne $default_cert && ! -f $orig_cert) {
print STDERR "Module signature verification enabled but ", print STDERR "Module signature verification enabled but ",
"module signing key \"$orig_cert\" not found. Resetting ", "module signing key \"$orig_cert\" not found. Resetting ",
"signing key to default value.\n"; "signing key to default value.\n";
print "CONFIG_MODULE_SIG_KEY=\"$default_cert\"\n"; print "CONFIG_MODULE_SIG_KEY=\"$default_cert\"\n";
} else { } else {
print; print;
} }
next; next;
} }
if (/CONFIG_SYSTEM_TRUSTED_KEYS="(.+)"/) { if (/CONFIG_SYSTEM_TRUSTED_KEYS="(.+)"/) {
my $orig_keys = $1; my $orig_keys = $1;
if (! -f $orig_keys) { if (! -f $orig_keys) {
print STDERR "System keyring enabled but keys \"$orig_keys\" ", print STDERR "System keyring enabled but keys \"$orig_keys\" ",
"not found. Resetting keys to default value.\n"; "not found. Resetting keys to default value.\n";
print "CONFIG_SYSTEM_TRUSTED_KEYS=\"\"\n"; print "CONFIG_SYSTEM_TRUSTED_KEYS=\"\"\n";
} else { } else {
print; print;
} }
next; next;
} }
if (/^(CONFIG.*)=(m|y)/) { if (/^(CONFIG.*)=(m|y)/) {
if (in_preserved_kconfigs($1)) { if (in_preserved_kconfigs($1)) {
dprint "Preserve config $1"; dprint "Preserve config $1";
print; print;
next; next;
} }
if (defined($configs{$1})) { if (defined($configs{$1})) {
if ($localyesconfig) { if ($localyesconfig) {
$setconfigs{$1} = 'y'; $setconfigs{$1} = 'y';
print "$1=y\n"; print "$1=y\n";
next; next;
} else { } else {
$setconfigs{$1} = $2; $setconfigs{$1} = $2;
} }
} elsif ($2 eq "m") { } elsif ($2 eq "m") {
print "# $1 is not set\n"; print "# $1 is not set\n";